Spherical law of cosines

Time bar (total: 24.6s)

analyze1.2s (4.7%)

Memory
-328.3MiB live, 1 200.8MiB allocated
Algorithm
1×search
Search
ProbabilityValidUnknownPreconditionInfiniteDomainCan'tIter
0%0%99.8%0.2%0%0%0%0
0%0%99.8%0.2%0%0%0%1
0%0%99.8%0.2%0%0%0%2
0%0%99.8%0.2%0%0%0%3
0%0%99.8%0.2%0%0%0%4
0%0%99.8%0.2%0%0%0%5
0%0%99.8%0.2%0%0%0%6
0%0%99.8%0.2%0%0%0%7
0%0%99.8%0.2%0%0%0%8
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.3s (17.6%)

Memory
139.6MiB live, 6 825.8MiB allocated
Samples
3.4s6 277×1valid
425.0ms1 963×0valid
23.0ms16×2valid
Precisions
Click to see histograms. Total time spent on operations: 3.3s
ival-cos: 1.4s (43.4% of total)
ival-sin: 808.0ms (24.3% of total)
ival-mult: 431.0ms (12.9% of total)
ival-acos: 294.0ms (8.8% of total)
adjust: 184.0ms (5.5% of total)
ival-add: 85.0ms (2.6% of total)
ival-sub: 73.0ms (2.2% of total)
ival-true: 7.0ms (0.2% of total)
ival-assert: 3.0ms (0.1% of total)
Bogosity

preprocess523.0ms (2.1%)

Memory
-66.4MiB live, 79.1MiB allocated
Algorithm
2×egg-herbie
Rules
1 680×unsub-neg
1 486×distribute-rgt-in
1 312×distribute-lft-in
818×distribute-lft-neg-in
660×neg-mul-1
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0130412
1272412
2459404
3802404
41520404
51988404
62263404
72736404
83267404
93798404
104427404
114716404
124910404
134948404
146292404
156766404
166878404
176894404
186894404
196910404
206910404
216990404
227022404
237022404
01719
12619
23819
34619
45519
57119
610419
712919
817319
918919
1019719
019718
Stop Event
1×iter limit
1×saturated
1×saturated
Calls
Call 1
Inputs
(* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R)
Outputs
(* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
Call 2
Inputs
(* (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))))) (neg R))
(* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- (neg lambda1) lambda2))))) R)
(* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 (neg lambda2)))))) R)
(* (acos (+ (* (sin (neg phi1)) (sin phi2)) (* (* (cos (neg phi1)) (cos phi2)) (cos (- lambda1 lambda2))))) R)
(* (acos (+ (* (sin phi1) (sin (neg phi2))) (* (* (cos phi1) (cos (neg phi2))) (cos (- lambda1 lambda2))))) R)
(neg (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (neg R)))
(neg (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- (neg lambda1) lambda2))))) R))
(neg (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 (neg lambda2)))))) R))
(neg (* (acos (+ (* (sin (neg phi1)) (sin phi2)) (* (* (cos (neg phi1)) (cos phi2)) (cos (- lambda1 lambda2))))) R))
(neg (* (acos (+ (* (sin phi1) (sin (neg phi2))) (* (* (cos phi1) (cos (neg phi2))) (cos (- lambda1 lambda2))))) R))
(* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- R lambda2))))) lambda1)
(* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 R))))) lambda2)
(* (acos (+ (* (sin R) (sin phi2)) (* (* (cos R) (cos phi2)) (cos (- lambda1 lambda2))))) phi1)
(* (acos (+ (* (sin phi1) (sin R)) (* (* (cos phi1) (cos R)) (cos (- lambda1 lambda2))))) phi2)
(* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda2 lambda1))))) R)
(* (acos (+ (* (sin lambda1) (sin phi2)) (* (* (cos lambda1) (cos phi2)) (cos (- phi1 lambda2))))) R)
(* (acos (+ (* (sin phi1) (sin lambda1)) (* (* (cos phi1) (cos lambda1)) (cos (- phi2 lambda2))))) R)
(* (acos (+ (* (sin lambda2) (sin phi2)) (* (* (cos lambda2) (cos phi2)) (cos (- lambda1 phi1))))) R)
(* (acos (+ (* (sin phi1) (sin lambda2)) (* (* (cos phi1) (cos lambda2)) (cos (- lambda1 phi2))))) R)
(* (acos (+ (* (sin phi2) (sin phi1)) (* (* (cos phi2) (cos phi1)) (cos (- lambda1 lambda2))))) R)
Outputs
(* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R)
(* R (acos (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (neg R))
(* (neg R) (acos (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- (neg lambda1) lambda2))))) R)
(* R (acos (+ (* (sin phi1) (sin phi2)) (* (cos phi2) (* (cos phi1) (cos (+ lambda1 lambda2)))))))
(* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 (neg lambda2)))))) R)
(* R (acos (+ (* (sin phi1) (sin phi2)) (* (cos phi2) (* (cos phi1) (cos (+ lambda1 lambda2)))))))
(* (acos (+ (* (sin (neg phi1)) (sin phi2)) (* (* (cos (neg phi1)) (cos phi2)) (cos (- lambda1 lambda2))))) R)
(* R (acos (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* (acos (+ (* (sin phi1) (sin (neg phi2))) (* (* (cos phi1) (cos (neg phi2))) (cos (- lambda1 lambda2))))) R)
(* R (acos (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(neg (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (neg R)))
(* R (acos (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(neg (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- (neg lambda1) lambda2))))) R))
(* (neg R) (acos (+ (* (sin phi1) (sin phi2)) (* (cos phi2) (* (cos phi1) (cos (+ lambda1 lambda2)))))))
(neg (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 (neg lambda2)))))) R))
(* (neg R) (acos (+ (* (sin phi1) (sin phi2)) (* (cos phi2) (* (cos phi1) (cos (+ lambda1 lambda2)))))))
(neg (* (acos (+ (* (sin (neg phi1)) (sin phi2)) (* (* (cos (neg phi1)) (cos phi2)) (cos (- lambda1 lambda2))))) R))
(* (neg R) (acos (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(neg (* (acos (+ (* (sin phi1) (sin (neg phi2))) (* (* (cos phi1) (cos (neg phi2))) (cos (- lambda1 lambda2))))) R))
(* (neg R) (acos (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- R lambda2))))) lambda1)
(* lambda1 (acos (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (cos (- R lambda2)))))))
(* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 R))))) lambda2)
(* lambda2 (acos (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 R)))))))
(* (acos (+ (* (sin R) (sin phi2)) (* (* (cos R) (cos phi2)) (cos (- lambda1 lambda2))))) phi1)
(* phi1 (acos (+ (* (sin phi2) (sin R)) (* (cos (- lambda1 lambda2)) (* (cos phi2) (cos R))))))
(* (acos (+ (* (sin phi1) (sin R)) (* (* (cos phi1) (cos R)) (cos (- lambda1 lambda2))))) phi2)
(* phi2 (acos (+ (* (sin phi1) (sin R)) (* (cos (- lambda1 lambda2)) (* (cos phi1) (cos R))))))
(* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda2 lambda1))))) R)
(* R (acos (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(* (acos (+ (* (sin lambda1) (sin phi2)) (* (* (cos lambda1) (cos phi2)) (cos (- phi1 lambda2))))) R)
(* R (acos (+ (* (sin phi2) (sin lambda1)) (* (cos phi2) (* (cos lambda1) (cos (- phi1 lambda2)))))))
(* (acos (+ (* (sin phi1) (sin lambda1)) (* (* (cos phi1) (cos lambda1)) (cos (- phi2 lambda2))))) R)
(* R (acos (+ (* (sin phi1) (sin lambda1)) (* (cos phi1) (* (cos lambda1) (cos (- phi2 lambda2)))))))
(* (acos (+ (* (sin lambda2) (sin phi2)) (* (* (cos lambda2) (cos phi2)) (cos (- lambda1 phi1))))) R)
(* R (acos (+ (* (sin phi2) (sin lambda2)) (* (cos phi2) (* (cos lambda2) (cos (- lambda1 phi1)))))))
(* (acos (+ (* (sin phi1) (sin lambda2)) (* (* (cos phi1) (cos lambda2)) (cos (- lambda1 phi2))))) R)
(* R (acos (+ (* (sin phi1) (sin lambda2)) (* (cos lambda2) (* (cos phi1) (cos (- lambda1 phi2)))))))
(* (acos (+ (* (sin phi2) (sin phi1)) (* (* (cos phi2) (cos phi1)) (cos (- lambda1 lambda2))))) R)
(* R (acos (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
Symmetry

(negabs R)

(sort lambda1 lambda2)

(sort phi1 phi2)

explain466.0ms (1.9%)

Memory
-10.6MiB live, 669.8MiB allocated
FPErrors
Click to see full error table
Ground TruthOverpredictionsExampleUnderpredictionsExampleSubexpression
63122(6.68477530843369e+39 -1.6117985747803962e+220 -4.3334113671551926e-104 -1.5745341566965276e+32 1.9991573571825196e+180)0-(cos.f64 (-.f64 lambda1 lambda2))
190-0-(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))sensitivity1850
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)))))sensitivity192
Confusion
Predicted +Predicted -
+800
-12155
Precision
0.39800995024875624
Recall
1.0
Confusion?
Predicted +Predicted MaybePredicted -
+8000
-121154
Precision?
0.39603960396039606
Recall?
1.0
Freqs
test
numberfreq
055
1198
23
Total Confusion?
Predicted +Predicted MaybePredicted -
+100
-000
Precision?
1.0
Recall?
1.0
Samples
283.0ms390×1valid
24.0ms118×0valid
4.0ms4×2valid
Compiler

Compiled 236 to 72 computations (69.5% saved)

Precisions
Click to see histograms. Total time spent on operations: 242.0ms
ival-cos: 100.0ms (41.3% of total)
ival-sin: 66.0ms (27.3% of total)
adjust: 26.0ms (10.7% of total)
ival-mult: 22.0ms (9.1% of total)
ival-acos: 18.0ms (7.4% of total)
ival-sub: 5.0ms (2.1% of total)
ival-add: 4.0ms (1.7% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

eval0.0ms (0%)

Memory
0.6MiB live, 0.6MiB allocated
Compiler

Compiled 5 to 5 computations (0% saved)

prune1.0ms (0%)

Memory
2.5MiB live, 2.5MiB allocated
Alt Table
Click to see full alt table
StatusAccuracyProgram
▶76.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)
Compiler

Compiled 24 to 17 computations (29.2% saved)

simplify10.0ms (0%)

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

Found 4 expressions of interest:

NewMetricScoreProgram
✓cost-diff0
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
✓cost-diff0
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
✓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)
Rules
96×accelerator-lowering-fma.f32
96×accelerator-lowering-fma.f64
80×*-lowering-*.f32
80×*-lowering-*.f64
36×+-lowering-+.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01792
12692
23892
34692
45592
57192
610492
712992
817392
918992
1019792
019789
Stop Event
1×iter limit
1×saturated
Calls
Call 1
Inputs
(* (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 phi1) (sin phi2))
(sin phi1)
phi1
(sin phi2)
phi2
(* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))
(* (cos phi1) (cos phi2))
(cos phi1)
(cos phi2)
(cos (- lambda1 lambda2))
(- lambda1 lambda2)
lambda1
lambda2
R
Outputs
(* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))
(+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(sin phi1)
(sin.f64 phi1)
phi1
(sin phi2)
(sin.f64 phi2)
phi2
(* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(* (cos phi1) (cos phi2))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(cos phi1)
(cos.f64 phi1)
(cos phi2)
(cos.f64 phi2)
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
lambda1
lambda2
R

localize197.0ms (0.8%)

Memory
-24.6MiB live, 257.9MiB allocated
Localize:

Found 4 expressions of interest:

NewMetricScoreProgram
✓accuracy99.7%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
✓accuracy99.7%
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
✓accuracy93.9%
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
✓accuracy79.0%
(cos.f64 (-.f64 lambda1 lambda2))
Samples
156.0ms195×1valid
13.0ms59×0valid
2.0ms2×2valid
Compiler

Compiled 94 to 19 computations (79.8% saved)

Precisions
Click to see histograms. Total time spent on operations: 151.0ms
ival-cos: 101.0ms (66.7% of total)
ival-sin: 22.0ms (14.5% of total)
ival-mult: 11.0ms (7.3% of total)
ival-acos: 8.0ms (5.3% of total)
adjust: 5.0ms (3.3% of total)
ival-sub: 2.0ms (1.3% of total)
ival-add: 2.0ms (1.3% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

series30.0ms (0.1%)

Memory
16.9MiB live, 55.4MiB allocated
Counts
5 → 204
Calls
Call 1
Inputs
#<alt (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R)>
#<alt (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))))>
#<alt (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (cos (- lambda1 lambda2))>
Outputs
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (* (cos phi2) (cos (- lambda1 lambda2)))>
#<alt (+ (* phi1 (sin phi2)) (* (cos phi2) (cos (- lambda1 lambda2))))>
#<alt (+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))>
#<alt (+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))>
#<alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))>
#<alt (* (cos phi1) (cos (- lambda1 lambda2)))>
#<alt (+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda1 lambda2))))>
#<alt (+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda1 lambda2))))))) (* (cos phi1) (cos (- lambda1 lambda2))))>
#<alt (+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (cos (- lambda1 lambda2))))>
#<alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (+ (* 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))))>
#<alt (+ (* 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))))>
#<alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (+ (* 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))))>
#<alt (+ (* 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))))>
#<alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (* phi1 (sin phi2))>
#<alt (* phi1 (+ (sin phi2) (* -1/6 (* (pow phi1 2) (sin phi2)))))>
#<alt (* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* 1/120 (* (pow phi1 2) (sin phi2)))))))>
#<alt (* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (sin phi2))) (* 1/120 (sin phi2))))))))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* phi2 (sin phi1))>
#<alt (* phi2 (+ (sin phi1) (* -1/6 (* (pow phi2 2) (sin phi1)))))>
#<alt (* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* 1/120 (* (pow phi2 2) (sin phi1)))))))>
#<alt (* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (sin phi1))) (* 1/120 (sin phi1))))))))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (cos (neg lambda2))>
#<alt (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))>
#<alt (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))>
#<alt (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))>
#<alt (cos (- lambda1 lambda2))>
#<alt (cos (- lambda1 lambda2))>
#<alt (cos (- lambda1 lambda2))>
#<alt (cos (- lambda1 lambda2))>
#<alt (cos (neg (+ lambda2 (* -1 lambda1))))>
#<alt (cos (neg (+ lambda2 (* -1 lambda1))))>
#<alt (cos (neg (+ lambda2 (* -1 lambda1))))>
#<alt (cos (neg (+ lambda2 (* -1 lambda1))))>
#<alt (cos lambda1)>
#<alt (+ (cos lambda1) (* lambda2 (sin lambda1)))>
#<alt (+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))>
#<alt (+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))>
#<alt (cos (- lambda1 lambda2))>
#<alt (cos (- lambda1 lambda2))>
#<alt (cos (- lambda1 lambda2))>
#<alt (cos (- lambda1 lambda2))>
#<alt (cos (+ lambda1 (* -1 lambda2)))>
#<alt (cos (+ lambda1 (* -1 lambda2)))>
#<alt (cos (+ lambda1 (* -1 lambda2)))>
#<alt (cos (+ lambda1 (* -1 lambda2)))>
Calls

51 calls:

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

rewrite434.0ms (1.8%)

Memory
-6.0MiB live, 706.7MiB allocated
Algorithm
1×batch-egg-rewrite
Rules
6 996×accelerator-lowering-fma.f32
6 996×accelerator-lowering-fma.f64
5 494×*-lowering-*.f32
5 494×*-lowering-*.f64
3 040×/-lowering-/.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01761
17161
254261
3718761
0840958
Stop Event
1×iter limit
1×node limit
Counts
5 → 218
Calls
Call 1
Inputs
(* (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 phi1) (sin phi2))
(cos (- lambda1 lambda2))
Outputs
(+.f64 (*.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 R (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(+.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R) (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
(fma.f64 R (/.f64 (PI.f64) #s(literal 2 binary64)) (*.f64 R (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
(/.f64 (*.f64 R (-.f64 (/.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal 8 binary64)) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 3 binary64)))) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(/.f64 (*.f64 R (-.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal 8 binary64)) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 3 binary64))) R) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64))) R) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(+.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 (PI.f64) #s(literal 2 binary64)))
(+.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(-.f64 (PI.f64) (acos.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))))))
(-.f64 (PI.f64) (acos.f64 (/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))))) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(-.f64 (PI.f64) (acos.f64 (/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))))
(-.f64 (PI.f64) (acos.f64 (/.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(-.f64 (/.f64 (/.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal 8 binary64)) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (/.f64 (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 3 binary64)) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))))
(-.f64 (/.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (/.f64 (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(fma.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(fma.f64 (sqrt.f64 (PI.f64)) (*.f64 (sqrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(fma.f64 (-.f64 #s(literal 0 binary64) (PI.f64)) #s(literal -1/2 binary64) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(fma.f64 #s(literal -1 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (PI.f64) #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))) (-.f64 (/.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal 8 binary64)) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (-.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (/.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal 8 binary64)) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 3 binary64))) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(/.f64 (-.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(/.f64 (neg.f64 (-.f64 (/.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal 8 binary64)) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))))
(/.f64 (neg.f64 (-.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)))) (neg.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(/.f64 (+.f64 (/.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal 8 binary64)) (pow.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) #s(literal 3 binary64))) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (-.f64 (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))))
(/.f64 (-.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(*.f64 (-.f64 (/.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal 8 binary64)) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))))
(*.f64 (-.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (neg.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(-.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(fma.f64 (sin.f64 phi1) (/.f64 (*.f64 (sin.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (neg.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(fma.f64 (sin.f64 phi2) (/.f64 (*.f64 (sin.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (neg.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(fma.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (neg.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (neg.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 #s(literal -2 binary64) (*.f64 (*.f64 (sin.f64 (/.f64 (-.f64 phi1 (+.f64 phi2 (+.f64 phi1 phi2))) #s(literal 2 binary64))) (sin.f64 (/.f64 (+.f64 phi1 (+.f64 phi2 (-.f64 phi1 phi2))) #s(literal 2 binary64)))) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (-.f64 phi1 (+.f64 phi2 (+.f64 phi1 phi2))) #s(literal 2 binary64))) (sin.f64 (/.f64 (+.f64 phi1 (+.f64 phi2 (-.f64 phi1 phi2))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(fma.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(fma.f64 (-.f64 #s(literal 0 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (neg.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (neg.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi1) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (*.f64 (sin.f64 phi1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (/.f64 (sin.f64 phi1) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (neg.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(fma.f64 (*.f64 (sin.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (/.f64 (sin.f64 phi2) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (neg.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 1/2 binary64) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.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 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))))) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (neg.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(fma.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (neg.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(neg.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))))
(neg.f64 (/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))))) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(neg.f64 (/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))))
(neg.f64 (/.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))))))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64)))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))))
(/.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))))) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 9 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 9 binary64))) (*.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (-.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 6 binary64))) (pow.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 3 binary64)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 6 binary64))) (*.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 6 binary64))) (*.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 4 binary64)) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 4 binary64))) (*.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))))))
(/.f64 (+.f64 (*.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))))) #s(literal 4 binary64))
(/.f64 (+.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)))
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))))) #s(literal -4 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))) #s(literal 4 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))))) #s(literal -4 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (*.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))))) (*.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 9 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 9 binary64))) #s(literal 1 binary64)) (*.f64 (-.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 6 binary64))) (pow.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 3 binary64))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 6 binary64))) #s(literal 1 binary64)) (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 6 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 4 binary64)) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 4 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))))) (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))))))) (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))))) (neg.f64 (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (+.f64 (*.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (*.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) #s(literal 1 binary64)) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(/.f64 (*.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))))) #s(literal 1 binary64)) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 9 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 9 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (-.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 6 binary64))) (pow.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 3 binary64))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 6 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 6 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 6 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 4 binary64)) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))))))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))))))
(pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal -1 binary64))
(*.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (*.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(*.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))))
(*.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (*.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))))
(*.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (/.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))))
(*.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(*.f64 #s(literal 1 binary64) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))))
(*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))))
(*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))))))
(*.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(*.f64 (/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))))) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(*.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 3 binary64)))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))))))
(*.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64)))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(*.f64 (/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))))) (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(+.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (neg.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64))))
(-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)))
(fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64) (neg.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64))))
(neg.f64 (*.f64 (sin.f64 phi2) (neg.f64 (sin.f64 phi1))))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 1 binary64)))
(/.f64 (-.f64 #s(literal 0 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) #s(literal -2 binary64))
(/.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2)))))) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))))
(/.f64 (-.f64 (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 phi1 phi2)))) #s(literal 4 binary64))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) (+.f64 (*.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64))) (*.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64))))))
(/.f64 (-.f64 (*.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) (*.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)))) (+.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64))))
(/.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 3 binary64))) #s(literal 1/2 binary64)) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) (*.f64 (cos.f64 (+.f64 phi1 phi2)) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))))))
(/.f64 (*.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2)))))) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))))
(pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal -1 binary64))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(*.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64))
(*.f64 #s(literal -2 binary64) (*.f64 (*.f64 (sin.f64 (/.f64 (-.f64 phi1 (+.f64 phi2 (+.f64 phi1 phi2))) #s(literal 2 binary64))) (sin.f64 (/.f64 (+.f64 phi1 (+.f64 phi2 (-.f64 phi1 phi2))) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (-.f64 phi1 (+.f64 phi2 (+.f64 phi1 phi2))) #s(literal 2 binary64))) (sin.f64 (/.f64 (+.f64 phi1 (+.f64 phi2 (-.f64 phi1 phi2))) #s(literal 2 binary64)))) #s(literal 2 binary64)))
(*.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) #s(literal -1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (neg.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)))))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))))
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (cos.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (sin.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))))
(+.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(literal 0 binary64) (sin.f64 (-.f64 lambda2 lambda1))))
(+.f64 (*.f64 (cos.f64 (+.f64 lambda1 #s(literal 0 binary64))) (cos.f64 lambda2)) (*.f64 (sin.f64 (+.f64 lambda1 #s(literal 0 binary64))) (sin.f64 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(cos.f64 (/.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))))))
(cos.f64 (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (-.f64 #s(literal 0 binary64) (+.f64 lambda1 lambda2))))
(cos.f64 (/.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2)))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(cos.f64 (/.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (+.f64 lambda1 lambda2)))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))))
(-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (cos.f64 (+.f64 lambda1 lambda2))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (cos.f64 (+.f64 lambda1 lambda2))))
(-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (cos.f64 (neg.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))))))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (sin.f64 (neg.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))))))))
(-.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (cos.f64 (neg.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (sin.f64 (neg.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))))))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (neg.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)))))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (neg.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)))))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (neg.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)))))
(fma.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))))
(fma.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal 0 binary64) (sin.f64 (-.f64 lambda2 lambda1))))
(fma.f64 (cos.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (cos.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (sin.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))))
(fma.f64 (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))))
(fma.f64 (cos.f64 (+.f64 lambda1 #s(literal 0 binary64))) (cos.f64 lambda2) (*.f64 (sin.f64 (+.f64 lambda1 #s(literal 0 binary64))) (sin.f64 lambda2)))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 lambda1 lambda2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 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 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (cos.f64 (+.f64 lambda1 lambda2)))
(/.f64 (+.f64 (*.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 (*.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 (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 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))))
(/.f64 (neg.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))) (neg.f64 (cos.f64 (+.f64 lambda1 lambda2))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) #s(literal 3 binary64))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (+.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)))))))
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))))) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))))) (cos.f64 (+.f64 lambda1 lambda2)))
(*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda1 lambda2))))

simplify495.0ms (2%)

Memory
13.2MiB live, 809.2MiB allocated
Algorithm
1×egg-herbie
Rules
15 196×accelerator-lowering-fma.f32
15 196×accelerator-lowering-fma.f64
4 928×*-lowering-*.f32
4 928×*-lowering-*.f64
3 966×+-lowering-+.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01833258
15703232
217093191
331193166
468853165
082272972
Stop Event
1×iter limit
1×node limit
Counts
204 → 204
Calls
Call 1
Inputs
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 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 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 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 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 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 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 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 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 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 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 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 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 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 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 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 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 (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (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)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (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 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 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 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 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (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)))))
(* R (acos (+ (* (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)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 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 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 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 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 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 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(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))))
(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))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(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))))
(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 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 phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (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))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (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 phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (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 phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin 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 phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+ (* (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 phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(* 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))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* 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))))))))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (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 (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
Outputs
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(* (cos phi2) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(+ (* phi1 (sin phi2)) (* (cos phi2) (cos (- lambda1 lambda2))))
(+.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 phi1 (sin.f64 phi2)))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(+.f64 (*.f64 phi1 (sin.f64 phi2)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(+.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1))) (*.f64 phi1 (sin.f64 phi2))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(* (cos phi1) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda1 lambda2))))
(+.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 phi2 (sin.f64 phi1)))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda1 lambda2))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(+.f64 (*.f64 phi2 (sin.f64 phi1)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 phi2 (*.f64 phi2 #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(+.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 phi2 (*.f64 phi2 #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 phi2 (*.f64 phi2 #s(literal -1/6 binary64)))) (*.f64 phi2 (sin.f64 phi1))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))
(+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))))
(+ (* 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))))
(+.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) lambda1))) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 lambda1 (*.f64 lambda1 #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))))
(+ (* 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))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (+.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 lambda1 (*.f64 lambda1 #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 lambda1 (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2))) (+.f64 #s(literal 1 binary64) (*.f64 lambda1 (*.f64 lambda1 #s(literal -1/6 binary64))))))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))
(+ (* 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))))
(+.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 lambda2 (sin.f64 lambda1)))) (*.f64 (+.f64 (*.f64 lambda2 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1)))))
(+ (* 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))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (+.f64 (*.f64 (+.f64 (*.f64 lambda2 (*.f64 lambda2 #s(literal -1/2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1)))) (*.f64 lambda2 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 lambda2 (*.f64 lambda2 #s(literal -1/6 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)))))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(* phi1 (sin phi2))
(*.f64 phi1 (sin.f64 phi2))
(* phi1 (+ (sin phi2) (* -1/6 (* (pow phi1 2) (sin phi2)))))
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1))) (*.f64 phi1 (sin.f64 phi2)))
(* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* 1/120 (* (pow phi1 2) (sin phi2)))))))
(*.f64 phi1 (*.f64 (sin.f64 phi2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal 1/120 binary64)))))))
(* 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 phi1 (+.f64 (sin.f64 phi2) (*.f64 (*.f64 phi1 phi1) (*.f64 (sin.f64 phi2) (+.f64 (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal -1/5040 binary64)))) #s(literal -1/6 binary64))))))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(* phi2 (sin phi1))
(*.f64 phi2 (sin.f64 phi1))
(* phi2 (+ (sin phi1) (* -1/6 (* (pow phi2 2) (sin phi1)))))
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 phi2 (*.f64 phi2 #s(literal -1/6 binary64)))) (*.f64 phi2 (sin.f64 phi1)))
(* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* 1/120 (* (pow phi2 2) (sin phi1)))))))
(*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (+.f64 #s(literal -1/6 binary64) (*.f64 #s(literal 1/120 binary64) (*.f64 phi2 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 phi2 (+.f64 (sin.f64 phi1) (*.f64 (*.f64 phi2 phi2) (*.f64 (sin.f64 phi1) (+.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 phi2 phi2) (+.f64 #s(literal 1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (*.f64 phi2 phi2)))))))))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(cos (neg lambda2))
(cos.f64 lambda2)
(+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))
(+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))
(+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))
(+.f64 (cos.f64 lambda2) (*.f64 lambda1 (+.f64 (*.f64 lambda1 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))) (sin.f64 lambda2))))
(+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))
(+.f64 (cos.f64 lambda2) (*.f64 lambda1 (+.f64 (*.f64 lambda1 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))) (*.f64 (-.f64 #s(literal 0 binary64) (sin.f64 lambda2)) (+.f64 #s(literal -1 binary64) (*.f64 lambda1 (*.f64 lambda1 #s(literal 1/6 binary64))))))))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda2 lambda1))
(cos lambda1)
(cos.f64 lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))
(+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))
(+.f64 (cos.f64 lambda1) (*.f64 lambda2 (+.f64 (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (*.f64 lambda2 #s(literal -1/2 binary64))))))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))
(+.f64 (cos.f64 lambda1) (*.f64 lambda2 (+.f64 (*.f64 (cos.f64 lambda1) (*.f64 lambda2 #s(literal -1/2 binary64))) (*.f64 (sin.f64 lambda1) (+.f64 #s(literal 1 binary64) (*.f64 lambda2 (*.f64 lambda2 #s(literal -1/6 binary64))))))))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda2 lambda1))

eval89.0ms (0.4%)

Memory
8.7MiB live, 86.5MiB allocated
Compiler

Compiled 15 547 to 1 356 computations (91.3% saved)

prune248.0ms (1%)

Memory
-1.5MiB live, 196.4MiB allocated
Pruning

47 alts after pruning (47 fresh and 0 done)

PrunedKeptTotal
New37547422
Fresh000
Picked101
Done000
Total37647423
Accuracy
94.9%
Counts
423 → 47
Alt Table
Click to see full alt table
StatusAccuracyProgram
▶75.2%
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
75.7%
(/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64))) R) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
75.8%
(+.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R) (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
74.4%
(*.f64 (fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) R)
74.6%
(*.f64 (fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) R)
75.7%
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (-.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64))))) R)
75.7%
(*.f64 (-.f64 (/.f64 (/.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal 8 binary64)) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (/.f64 (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 3 binary64)) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))) R)
75.7%
(*.f64 (-.f64 (/.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (/.f64 (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))) R)
75.8%
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
75.5%
(*.f64 (-.f64 (PI.f64) (acos.f64 (/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))))) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))) R)
60.4%
(*.f64 (acos.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
94.3%
(*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
75.7%
(*.f64 (acos.f64 (fma.f64 (*.f64 (sin.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (/.f64 (sin.f64 phi2) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (neg.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))) R)
76.0%
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
75.5%
(*.f64 (acos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 4 binary64))) (*.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))))))) R)
75.7%
(*.f64 (acos.f64 (/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
75.8%
(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) R)
60.3%
(*.f64 (acos.f64 (-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
60.1%
(*.f64 (acos.f64 (-.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)))) R)
▶94.3%
(*.f64 (acos.f64 (+.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
35.3%
(*.f64 (acos.f64 (+.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1))) (*.f64 phi1 (sin.f64 phi2))))) R)
39.2%
(*.f64 (acos.f64 (+.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1))) (*.f64 phi1 (sin.f64 phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
94.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 lambda1) (cos.f64 lambda2)))))) R)
▶94.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 lambda1) (sin.f64 lambda2)))))) R)
94.2%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))))) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))) R)
94.0%
(*.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 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))))) R)
76.0%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (cos.f64 (+.f64 lambda1 lambda2)))))) R)
75.9%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 lambda1 lambda2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))))))) R)
75.5%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (cos.f64 (+.f64 lambda1 lambda2))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (cos.f64 (+.f64 lambda1 lambda2))))))) R)
94.3%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
45.7%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (+.f64 (*.f64 lambda1 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))) (sin.f64 lambda2))))))) R)
47.5%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))))) R)
47.9%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (+.f64 (*.f64 (cos.f64 lambda1) (*.f64 lambda2 #s(literal -1/2 binary64))) (*.f64 (sin.f64 lambda1) (+.f64 #s(literal 1 binary64) (*.f64 lambda2 (*.f64 lambda2 #s(literal -1/6 binary64))))))))))) R)
47.8%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (+.f64 (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (*.f64 lambda2 #s(literal -1/2 binary64))))))))) R)
50.0%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))) R)
75.9%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda1 lambda2))))))) R)
45.2%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (-.f64 #s(literal 0 binary64) (+.f64 lambda1 lambda2))))))) R)
▶56.6%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)))) R)
54.7%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))) R)
36.8%
(*.f64 (acos.f64 (+.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 phi1 (sin.f64 phi2)))) R)
36.4%
(*.f64 (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 phi2 (sin.f64 phi1)))) R)
34.1%
(*.f64 (acos.f64 (+.f64 (*.f64 phi2 (sin.f64 phi1)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 phi2 (*.f64 phi2 #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
37.7%
(*.f64 (acos.f64 (+.f64 (*.f64 phi1 (*.f64 (sin.f64 phi2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal 1/120 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
35.2%
(*.f64 (acos.f64 (+.f64 (*.f64 phi1 (sin.f64 phi2)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
45.3%
(*.f64 (acos.f64 (+.f64 (*.f64 phi1 (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
43.1%
(*.f64 (acos.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) R)
▶42.9%
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) R)
Compiler

Compiled 3 812 to 2 268 computations (40.5% saved)

simplify339.0ms (1.4%)

Memory
-9.5MiB live, 194.3MiB allocated
Algorithm
1×egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
✓cost-diff0
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
✓cost-diff0
(acos.f64 (+.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
✓cost-diff0
(*.f64 (acos.f64 (+.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
✓cost-diff13056
(+.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
✓cost-diff0
(*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
✓cost-diff0
(PI.f64)
✓cost-diff0
(/.f64 (PI.f64) #s(literal 2 binary64))
✓cost-diff6528
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
✓cost-diff0
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
✓cost-diff0
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)))
✓cost-diff0
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1))))
✓cost-diff0
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)))) R)
✓cost-diff0
(cos.f64 phi1)
✓cost-diff0
(*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))
✓cost-diff0
(acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))
✓cost-diff0
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) R)
✓cost-diff0
(+.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 lambda1) (sin.f64 lambda2)))))
✓cost-diff0
(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 lambda1) (sin.f64 lambda2))))))
✓cost-diff0
(*.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 lambda1) (sin.f64 lambda2)))))) R)
✓cost-diff6272
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
Rules
3 776×accelerator-lowering-fma.f32
3 776×accelerator-lowering-fma.f64
2 128×*-lowering-*.f32
2 128×*-lowering-*.f64
1 436×unsub-neg
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
054560
1112559
2226559
3329559
4380559
5480559
6579559
7780559
81316559
91795559
102259559
112767559
123122559
133319559
143458559
153577559
164553559
174971559
184971559
194973559
204973559
214975559
224975559
234975559
244983559
04983536
Stop Event
1×iter limit
1×saturated
Calls
Call 1
Inputs
(* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))))) R)
(acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))))
(+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))))
(* (sin phi1) (sin phi2))
(sin phi1)
phi1
(sin phi2)
phi2
(* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))
(* (cos phi1) (cos phi2))
(cos phi1)
(cos phi2)
(+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))
(cos lambda2)
lambda2
(cos lambda1)
lambda1
(* (sin lambda1) (sin lambda2))
(sin lambda1)
(sin lambda2)
R
(* (acos (* (cos phi1) (cos (- lambda2 lambda1)))) R)
(acos (* (cos phi1) (cos (- lambda2 lambda1))))
(* (cos phi1) (cos (- lambda2 lambda1)))
(cos phi1)
phi1
(cos (- lambda2 lambda1))
(- lambda2 lambda1)
lambda2
lambda1
R
(* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos lambda1)))) R)
(acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos lambda1))))
(+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos lambda1)))
(* (sin phi1) (sin phi2))
(sin phi1)
phi1
(sin phi2)
phi2
(* (* (cos phi1) (cos phi2)) (cos lambda1))
(* (cos phi1) (cos phi2))
(cos phi1)
(cos phi2)
(cos lambda1)
lambda1
R
(+ (* (/ (PI) 2) R) (* (- 0 (asin (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))) R))
(/ (PI) 2)
(PI)
2
R
(* (- 0 (asin (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))) R)
(- 0 (asin (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
0
(asin (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (sin phi1) (sin phi2))
(sin phi1)
phi1
(sin phi2)
phi2
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(cos phi1)
(* (cos phi2) (cos (- lambda1 lambda2)))
(cos phi2)
(cos (- lambda1 lambda2))
(- lambda1 lambda2)
lambda1
lambda2
(* (acos (+ (+ (* (sin phi1) (sin phi2)) (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2))) (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))) R)
(acos (+ (+ (* (sin phi1) (sin phi2)) (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2))) (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2))))))
(+ (+ (* (sin phi1) (sin phi2)) (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2))) (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
(+ (* (sin phi1) (sin phi2)) (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)))
(* (sin phi1) (sin phi2))
(sin phi1)
phi1
(sin phi2)
phi2
(* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2))
(* (* (cos lambda1) (cos lambda2)) (cos phi1))
(* (cos lambda1) (cos lambda2))
(cos lambda1)
lambda1
(cos lambda2)
lambda2
(cos phi1)
(cos phi2)
(* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2))))
(* (cos phi2) (* (sin lambda1) (sin lambda2)))
(* (sin lambda1) (sin lambda2))
(sin lambda1)
(sin lambda2)
R
Outputs
(* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))))) R)
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))))
(acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
(+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(sin phi1)
(sin.f64 phi1)
phi1
(sin phi2)
(sin.f64 phi2)
phi2
(* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(* (cos phi1) (cos phi2))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(cos phi1)
(cos.f64 phi1)
(cos phi2)
(cos.f64 phi2)
(+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))
(+.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(cos lambda2)
(cos.f64 lambda2)
lambda2
(cos lambda1)
(cos.f64 lambda1)
lambda1
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(sin lambda1)
(sin.f64 lambda1)
(sin lambda2)
(sin.f64 lambda2)
R
(* (acos (* (cos phi1) (cos (- lambda2 lambda1)))) R)
(*.f64 R (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))
(acos (* (cos phi1) (cos (- lambda2 lambda1))))
(acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))
(* (cos phi1) (cos (- lambda2 lambda1)))
(*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))
(cos phi1)
(cos.f64 phi1)
phi1
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda2 lambda1))
(- lambda2 lambda1)
(-.f64 lambda2 lambda1)
lambda2
lambda1
R
(* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos lambda1)))) R)
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))))))
(acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos lambda1))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1)))))
(+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos lambda1)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(sin phi1)
(sin.f64 phi1)
phi1
(sin phi2)
(sin.f64 phi2)
phi2
(* (* (cos phi1) (cos phi2)) (cos lambda1))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1)))
(* (cos phi1) (cos phi2))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(cos phi1)
(cos.f64 phi1)
(cos phi2)
(cos.f64 phi2)
(cos lambda1)
(cos.f64 lambda1)
lambda1
R
(+ (* (/ (PI) 2) R) (* (- 0 (asin (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))) R))
(*.f64 R (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))))))
(/ (PI) 2)
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI)
(PI.f64)
2
#s(literal 2 binary64)
R
(* (- 0 (asin (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))) R)
(-.f64 #s(literal 0 binary64) (*.f64 R (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))))))
(- 0 (asin (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))))
0
#s(literal 0 binary64)
(asin (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))))
(+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(sin phi1)
(sin.f64 phi1)
phi1
(sin phi2)
(sin.f64 phi2)
phi2
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))
(cos phi1)
(cos.f64 phi1)
(* (cos phi2) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))
(cos phi2)
(cos.f64 phi2)
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
lambda1
lambda2
(* (acos (+ (+ (* (sin phi1) (sin phi2)) (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2))) (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))) R)
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))))
(acos (+ (+ (* (sin phi1) (sin phi2)) (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2))) (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2))))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
(+ (+ (* (sin phi1) (sin phi2)) (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2))) (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(+ (* (sin phi1) (sin phi2)) (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(sin phi1)
(sin.f64 phi1)
phi1
(sin phi2)
(sin.f64 phi2)
phi2
(* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))
(* (* (cos lambda1) (cos lambda2)) (cos phi1))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(* (cos lambda1) (cos lambda2))
(*.f64 (cos.f64 lambda2) (cos.f64 lambda1))
(cos lambda1)
(cos.f64 lambda1)
lambda1
(cos lambda2)
(cos.f64 lambda2)
lambda2
(cos phi1)
(cos.f64 phi1)
(cos phi2)
(cos.f64 phi2)
(* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2))))
(*.f64 (sin.f64 lambda1) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)))
(* (cos phi2) (* (sin lambda1) (sin lambda2)))
(*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(sin lambda1)
(sin.f64 lambda1)
(sin lambda2)
(sin.f64 lambda2)
R

localize817.0ms (3.3%)

Memory
-14.0MiB live, 904.4MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
✓accuracy99.8%
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
✓accuracy99.7%
(*.f64 (acos.f64 (+.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
✓accuracy99.7%
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
✓accuracy93.9%
(acos.f64 (+.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
✓accuracy99.6%
(*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
✓accuracy99.3%
(asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
✓accuracy94.1%
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
✓accuracy79.0%
(cos.f64 (-.f64 lambda1 lambda2))
✓accuracy99.8%
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1))
✓accuracy99.7%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)))) R)
✓accuracy99.7%
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
✓accuracy88.5%
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1))))
✓accuracy99.8%
(*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))
✓accuracy99.7%
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) R)
✓accuracy86.0%
(acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))
✓accuracy79.0%
(cos.f64 (-.f64 lambda2 lambda1))
✓accuracy99.7%
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
✓accuracy99.7%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
✓accuracy99.7%
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
✓accuracy93.9%
(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 lambda1) (sin.f64 lambda2))))))
Samples
635.0ms209×1valid
39.0ms9×2valid
31.0ms38×0valid
Compiler

Compiled 579 to 56 computations (90.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 557.0ms
ival-mult: 137.0ms (24.6% of total)
ival-cos: 132.0ms (23.7% of total)
ival-sin: 94.0ms (16.9% of total)
ival-add: 88.0ms (15.8% of total)
ival-asin: 42.0ms (7.5% of total)
ival-acos: 35.0ms (6.3% of total)
adjust: 16.0ms (2.9% of total)
ival-sub: 7.0ms (1.3% of total)
ival-div: 3.0ms (0.5% of total)
ival-pi: 2.0ms (0.4% of total)
exact: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)

series117.0ms (0.5%)

Memory
-1.4MiB live, 193.5MiB allocated
Counts
26 → 984
Calls
Call 1
Inputs
#<alt (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))>
#<alt (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))))) R)>
#<alt (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))))>
#<alt (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (acos (* (cos phi1) (cos (- lambda2 lambda1)))) R)>
#<alt (acos (* (cos phi1) (cos (- lambda2 lambda1))))>
#<alt (* (cos phi1) (cos (- lambda2 lambda1)))>
#<alt (cos phi1)>
#<alt (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos lambda1)))) R)>
#<alt (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos lambda1))))>
#<alt (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos lambda1)))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (+ (* (/ (PI) 2) R) (* (- 0 (asin (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))) R))>
#<alt (/ (PI) 2)>
#<alt (PI)>
#<alt (* (- 0 (asin (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))) R)>
#<alt (+ (+ (* (sin phi1) (sin phi2)) (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2))) (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (acos (+ (+ (* (sin phi1) (sin phi2)) (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2))) (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))) R)>
#<alt (acos (+ (+ (* (sin phi1) (sin phi2)) (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2))) (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2))))))>
#<alt (+ (* (sin phi1) (sin phi2)) (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)))>
#<alt (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))>
#<alt (cos (- lambda2 lambda1))>
#<alt (* (* (cos phi1) (cos phi2)) (cos lambda1))>
#<alt (cos (- lambda1 lambda2))>
#<alt (asin (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))>
#<alt (* (sin lambda1) (sin lambda2))>
Outputs
#<alt (cos lambda1)>
#<alt (+ (cos lambda1) (* lambda2 (sin lambda1)))>
#<alt (+ (cos lambda1) (* lambda2 (+ (sin lambda1) (* -1/2 (* lambda2 (cos lambda1))))))>
#<alt (+ (cos lambda1) (* lambda2 (+ (sin lambda1) (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))))))>
#<alt (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))>
#<alt (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))>
#<alt (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))>
#<alt (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))>
#<alt (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))>
#<alt (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))>
#<alt (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))>
#<alt (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))>
#<alt (cos lambda2)>
#<alt (+ (cos lambda2) (* lambda1 (sin lambda2)))>
#<alt (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))>
#<alt (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))))))>
#<alt (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))>
#<alt (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))>
#<alt (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))>
#<alt (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))>
#<alt (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))>
#<alt (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))>
#<alt (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))>
#<alt (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))>
#<alt (+ (* phi1 (sin phi2)) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (+ (* 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)))))>
#<alt (+ (* 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)))))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))>
#<alt (+ (* phi2 (sin phi1)) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (+ (* 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)))))>
#<alt (+ (* 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)))))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (+ (* 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))))>
#<alt (+ (* 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))))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (+ (* 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))))>
#<alt (+ (* 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))))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))>
#<alt (* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))>
#<alt (* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))>
#<alt (* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))>
#<alt (* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))>
#<alt (* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))>
#<alt (* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))>
#<alt (* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))>
#<alt (* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))>
#<alt (* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))>
#<alt (* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))>
#<alt (* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))>
#<alt (* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))>
#<alt (* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))>
#<alt (* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))>
#<alt (* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))>
#<alt (* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))>
#<alt (* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))>
#<alt (* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))>
#<alt (* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))>
#<alt (* R (acos (* (cos phi1) (cos (neg (+ lambda1 (* -1 lambda2)))))))>
#<alt (* R (acos (* (cos phi1) (cos (neg (+ lambda1 (* -1 lambda2)))))))>
#<alt (* R (acos (* (cos phi1) (cos (neg (+ lambda1 (* -1 lambda2)))))))>
#<alt (* R (acos (* (cos phi1) (cos (neg (+ lambda1 (* -1 lambda2)))))))>
#<alt (* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))>
#<alt (* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))>
#<alt (* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))>
#<alt (* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))>
#<alt (* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))>
#<alt (* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))>
#<alt (* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))>
#<alt (* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))>
#<alt (* R (acos (* (cos phi1) (cos (+ lambda2 (* -1 lambda1))))))>
#<alt (* R (acos (* (cos phi1) (cos (+ lambda2 (* -1 lambda1))))))>
#<alt (* R (acos (* (cos phi1) (cos (+ lambda2 (* -1 lambda1))))))>
#<alt (* R (acos (* (cos phi1) (cos (+ lambda2 (* -1 lambda1))))))>
#<alt (* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))>
#<alt (* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))>
#<alt (* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))>
#<alt (* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))>
#<alt (* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))>
#<alt (* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))>
#<alt (* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))>
#<alt (* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))>
#<alt (* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))>
#<alt (* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))>
#<alt (* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))>
#<alt (* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))>
#<alt (acos (* (cos phi1) (cos (- lambda2 lambda1))))>
#<alt (acos (* (cos phi1) (cos (- lambda2 lambda1))))>
#<alt (acos (* (cos phi1) (cos (- lambda2 lambda1))))>
#<alt (acos (* (cos phi1) (cos (- lambda2 lambda1))))>
#<alt (acos (* (cos phi1) (cos (- lambda2 lambda1))))>
#<alt (acos (* (cos phi1) (cos (- lambda2 lambda1))))>
#<alt (acos (* (cos phi1) (cos (- lambda2 lambda1))))>
#<alt (acos (* (cos phi1) (cos (- lambda2 lambda1))))>
#<alt (acos (* (cos phi1) (cos (- lambda2 lambda1))))>
#<alt (acos (* (cos phi1) (cos (- lambda2 lambda1))))>
#<alt (acos (* (cos phi1) (cos (- lambda2 lambda1))))>
#<alt (acos (* (cos phi1) (cos (- lambda2 lambda1))))>
#<alt (acos (* (cos phi1) (cos (- lambda2 lambda1))))>
#<alt (acos (* (cos phi1) (cos (- lambda2 lambda1))))>
#<alt (acos (* (cos phi1) (cos (- lambda2 lambda1))))>
#<alt (acos (* (cos phi1) (cos (- lambda2 lambda1))))>
#<alt (acos (* (cos phi1) (cos (- lambda2 lambda1))))>
#<alt (acos (* (cos phi1) (cos (- lambda2 lambda1))))>
#<alt (acos (* (cos phi1) (cos (- lambda2 lambda1))))>
#<alt (acos (* (cos phi1) (cos (- lambda2 lambda1))))>
#<alt (acos (* (cos phi1) (cos (neg (+ lambda1 (* -1 lambda2))))))>
#<alt (acos (* (cos phi1) (cos (neg (+ lambda1 (* -1 lambda2))))))>
#<alt (acos (* (cos phi1) (cos (neg (+ lambda1 (* -1 lambda2))))))>
#<alt (acos (* (cos phi1) (cos (neg (+ lambda1 (* -1 lambda2))))))>
#<alt (acos (* (cos phi1) (cos (- lambda2 lambda1))))>
#<alt (acos (* (cos phi1) (cos (- lambda2 lambda1))))>
#<alt (acos (* (cos phi1) (cos (- lambda2 lambda1))))>
#<alt (acos (* (cos phi1) (cos (- lambda2 lambda1))))>
#<alt (acos (* (cos phi1) (cos (- lambda2 lambda1))))>
#<alt (acos (* (cos phi1) (cos (- lambda2 lambda1))))>
#<alt (acos (* (cos phi1) (cos (- lambda2 lambda1))))>
#<alt (acos (* (cos phi1) (cos (- lambda2 lambda1))))>
#<alt (acos (* (cos phi1) (cos (+ lambda2 (* -1 lambda1)))))>
#<alt (acos (* (cos phi1) (cos (+ lambda2 (* -1 lambda1)))))>
#<alt (acos (* (cos phi1) (cos (+ lambda2 (* -1 lambda1)))))>
#<alt (acos (* (cos phi1) (cos (+ lambda2 (* -1 lambda1)))))>
#<alt (cos (- lambda2 lambda1))>
#<alt (+ (cos (- lambda2 lambda1)) (* -1/2 (* (pow phi1 2) (cos (- lambda2 lambda1)))))>
#<alt (+ (cos (- lambda2 lambda1)) (* (pow phi1 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* 1/24 (* (pow phi1 2) (cos (- lambda2 lambda1)))))))>
#<alt (+ (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))))))))>
#<alt (* (cos phi1) (cos (- lambda2 lambda1)))>
#<alt (* (cos phi1) (cos (- lambda2 lambda1)))>
#<alt (* (cos phi1) (cos (- lambda2 lambda1)))>
#<alt (* (cos phi1) (cos (- lambda2 lambda1)))>
#<alt (* (cos phi1) (cos (- lambda2 lambda1)))>
#<alt (* (cos phi1) (cos (- lambda2 lambda1)))>
#<alt (* (cos phi1) (cos (- lambda2 lambda1)))>
#<alt (* (cos phi1) (cos (- lambda2 lambda1)))>
#<alt (* (cos phi1) (cos (neg lambda1)))>
#<alt (+ (* -1 (* lambda2 (* (cos phi1) (sin (neg lambda1))))) (* (cos phi1) (cos (neg lambda1))))>
#<alt (+ (* lambda2 (+ (* -1 (* (cos phi1) (sin (neg lambda1)))) (* -1/2 (* lambda2 (* (cos phi1) (cos (neg lambda1))))))) (* (cos phi1) (cos (neg lambda1))))>
#<alt (+ (* 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))))>
#<alt (* (cos phi1) (cos (- lambda2 lambda1)))>
#<alt (* (cos phi1) (cos (- lambda2 lambda1)))>
#<alt (* (cos phi1) (cos (- lambda2 lambda1)))>
#<alt (* (cos phi1) (cos (- lambda2 lambda1)))>
#<alt (* (cos phi1) (cos (neg (+ lambda1 (* -1 lambda2)))))>
#<alt (* (cos phi1) (cos (neg (+ lambda1 (* -1 lambda2)))))>
#<alt (* (cos phi1) (cos (neg (+ lambda1 (* -1 lambda2)))))>
#<alt (* (cos phi1) (cos (neg (+ lambda1 (* -1 lambda2)))))>
#<alt (* (cos lambda2) (cos phi1))>
#<alt (+ (* lambda1 (* (cos phi1) (sin lambda2))) (* (cos lambda2) (cos phi1)))>
#<alt (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi1)))) (* (cos phi1) (sin lambda2)))) (* (cos lambda2) (cos phi1)))>
#<alt (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (cos phi1))) (* -1/6 (* lambda1 (* (cos phi1) (sin lambda2)))))) (* (cos phi1) (sin lambda2)))) (* (cos lambda2) (cos phi1)))>
#<alt (* (cos phi1) (cos (- lambda2 lambda1)))>
#<alt (* (cos phi1) (cos (- lambda2 lambda1)))>
#<alt (* (cos phi1) (cos (- lambda2 lambda1)))>
#<alt (* (cos phi1) (cos (- lambda2 lambda1)))>
#<alt (* (cos phi1) (cos (+ lambda2 (* -1 lambda1))))>
#<alt (* (cos phi1) (cos (+ lambda2 (* -1 lambda1))))>
#<alt (* (cos phi1) (cos (+ lambda2 (* -1 lambda1))))>
#<alt (* (cos phi1) (cos (+ lambda2 (* -1 lambda1))))>
#<alt 1>
#<alt (+ 1 (* -1/2 (pow phi1 2)))>
#<alt (+ 1 (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2)))>
#<alt (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2)))>
#<alt (cos phi1)>
#<alt (cos phi1)>
#<alt (cos phi1)>
#<alt (cos phi1)>
#<alt (cos phi1)>
#<alt (cos phi1)>
#<alt (cos phi1)>
#<alt (cos phi1)>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (* (cos lambda1) (cos phi2))>
#<alt (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2)))>
#<alt (+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos lambda1) (cos phi2)))))) (* (cos lambda1) (cos phi2)))>
#<alt (+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos lambda1) (cos phi2)))>
#<alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (* (cos lambda1) (cos phi1))>
#<alt (+ (* phi2 (sin phi1)) (* (cos lambda1) (cos phi1)))>
#<alt (+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos lambda1) (cos phi1)))))) (* (cos lambda1) (cos phi1)))>
#<alt (+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos lambda1) (cos phi1))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos lambda1) (cos phi1)))>
#<alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))>
#<alt (+ (* -1/2 (* (pow lambda1 2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (+ (* (cos phi1) (cos phi2)) (+ (* (sin phi1) (sin phi2)) (* (pow lambda1 2) (+ (* -1/2 (* (cos phi1) (cos phi2))) (* 1/24 (* (pow lambda1 2) (* (cos phi1) (cos phi2))))))))>
#<alt (+ (* (cos phi1) (cos phi2)) (+ (* (sin phi1) (sin phi2)) (* (pow lambda1 2) (+ (* -1/2 (* (cos phi1) (cos phi2))) (* (pow lambda1 2) (+ (* -1/720 (* (pow lambda1 2) (* (cos phi1) (cos phi2)))) (* 1/24 (* (cos phi1) (cos phi2)))))))))>
#<alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (* phi1 (sin phi2))>
#<alt (* phi1 (+ (sin phi2) (* -1/6 (* (pow phi1 2) (sin phi2)))))>
#<alt (* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* 1/120 (* (pow phi1 2) (sin phi2)))))))>
#<alt (* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (sin phi2))) (* 1/120 (sin phi2))))))))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* phi2 (sin phi1))>
#<alt (* phi2 (+ (sin phi1) (* -1/6 (* (pow phi2 2) (sin phi1)))))>
#<alt (* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* 1/120 (* (pow phi2 2) (sin phi1)))))))>
#<alt (* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (sin phi1))) (* 1/120 (sin phi1))))))))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))>
#<alt (* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))>
#<alt (* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))>
#<alt (* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))>
#<alt (* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))>
#<alt (* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))>
#<alt (* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))>
#<alt (* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))>
#<alt (* -1 (* R (+ (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (* -1/2 (PI)))))>
#<alt (* -1 (* R (+ (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (* -1/2 (PI)))))>
#<alt (* -1 (* R (+ (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (* -1/2 (PI)))))>
#<alt (* -1 (* R (+ (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (* -1/2 (PI)))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))))>
#<alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))))>
#<alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))))>
#<alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))))>
#<alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))))>
#<alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))))>
#<alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))))>
#<alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))))>
#<alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2))))>
#<alt (+ (* phi1 (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))>
#<alt (+ (* 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)))))>
#<alt (+ (* 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)))))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2))))>
#<alt (+ (* phi2 (sin phi1)) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2)))))>
#<alt (+ (* 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)))))>
#<alt (+ (* 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)))))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (+ (* 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))))>
#<alt (+ (* 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))))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (+ (* 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))))>
#<alt (+ (* 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))))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* (cos lambda1) (* (cos lambda2) (cos phi2)))>
#<alt (+ (* phi1 (sin phi2)) (* (cos lambda1) (* (cos lambda2) (cos phi2))))>
#<alt (+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos lambda1) (* (cos lambda2) (cos phi2))))))) (* (cos lambda1) (* (cos lambda2) (cos phi2))))>
#<alt (+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos lambda1) (* (cos lambda2) (cos phi2))))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))>
#<alt (* (cos lambda1) (* (cos lambda2) (cos phi1)))>
#<alt (+ (* phi2 (sin phi1)) (* (cos lambda1) (* (cos lambda2) (cos phi1))))>
#<alt (+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos lambda1) (* (cos lambda2) (cos phi1))))))) (* (cos lambda1) (* (cos lambda2) (cos phi1))))>
#<alt (+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos lambda1) (* (cos lambda2) (cos phi1))))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* -1/2 (* (pow lambda1 2) (* (cos lambda2) (* (cos phi1) (cos phi2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (+ (* (sin phi1) (sin phi2)) (* (pow lambda1 2) (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* 1/24 (* (pow lambda1 2) (* (cos lambda2) (* (cos phi1) (cos phi2)))))))))>
#<alt (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (+ (* (sin phi1) (sin phi2)) (* (pow lambda1 2) (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (pow lambda1 2) (+ (* -1/720 (* (pow lambda1 2) (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* 1/24 (* (cos lambda2) (* (cos phi1) (cos phi2))))))))))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* -1/2 (* (pow lambda2 2) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (+ (* (sin phi1) (sin phi2)) (* (pow lambda2 2) (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* 1/24 (* (pow lambda2 2) (* (cos lambda1) (* (cos phi1) (cos phi2)))))))))>
#<alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (+ (* (sin phi1) (sin phi2)) (* (pow lambda2 2) (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* 1/24 (* (cos lambda1) (* (cos phi1) (cos phi2))))))))))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))>
#<alt (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))>
#<alt (+ (* -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)))))>
#<alt (+ (* (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)))))))))>
#<alt (+ (* (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))))))))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))>
#<alt (+ (* -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)))))>
#<alt (+ (* (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)))))))))>
#<alt (+ (* (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))))))))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos lambda1) (* (cos phi1) (cos phi2)))>
#<alt (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (* (cos phi1) (cos phi2))))>
#<alt (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))>
#<alt (+ (* 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))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos lambda2) (* (cos phi1) (cos phi2)))>
#<alt (+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi1) (cos phi2))))>
#<alt (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (* (cos phi1) (cos phi2))))>
#<alt (+ (* 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))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (cos (neg lambda1))>
#<alt (+ (cos (neg lambda1)) (* -1 (* lambda2 (sin (neg lambda1)))))>
#<alt (+ (cos (neg lambda1)) (* lambda2 (- (* -1/2 (* lambda2 (cos (neg lambda1)))) (sin (neg lambda1)))))>
#<alt (+ (cos (neg lambda1)) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (neg lambda1))) (* 1/6 (* lambda2 (sin (neg lambda1)))))) (sin (neg lambda1)))))>
#<alt (cos (- lambda2 lambda1))>
#<alt (cos (- lambda2 lambda1))>
#<alt (cos (- lambda2 lambda1))>
#<alt (cos (- lambda2 lambda1))>
#<alt (cos (neg (+ lambda1 (* -1 lambda2))))>
#<alt (cos (neg (+ lambda1 (* -1 lambda2))))>
#<alt (cos (neg (+ lambda1 (* -1 lambda2))))>
#<alt (cos (neg (+ lambda1 (* -1 lambda2))))>
#<alt (cos lambda2)>
#<alt (+ (cos lambda2) (* lambda1 (sin lambda2)))>
#<alt (+ (cos lambda2) (* lambda1 (- (* -1/2 (* lambda1 (cos lambda2))) (* -1 (sin lambda2)))))>
#<alt (+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))) (* -1 (sin lambda2)))))>
#<alt (cos (- lambda2 lambda1))>
#<alt (cos (- lambda2 lambda1))>
#<alt (cos (- lambda2 lambda1))>
#<alt (cos (- lambda2 lambda1))>
#<alt (cos (+ lambda2 (* -1 lambda1)))>
#<alt (cos (+ lambda2 (* -1 lambda1)))>
#<alt (cos (+ lambda2 (* -1 lambda1)))>
#<alt (cos (+ lambda2 (* -1 lambda1)))>
#<alt (* (cos lambda1) (cos phi2))>
#<alt (+ (* -1/2 (* (pow phi1 2) (* (cos lambda1) (cos phi2)))) (* (cos lambda1) (cos phi2)))>
#<alt (+ (* (cos lambda1) (cos phi2)) (* (pow phi1 2) (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* 1/24 (* (pow phi1 2) (* (cos lambda1) (cos phi2)))))))>
#<alt (+ (* (cos lambda1) (cos phi2)) (* (pow phi1 2) (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (cos lambda1) (cos phi2)))) (* 1/24 (* (cos lambda1) (cos phi2))))))))>
#<alt (* (cos lambda1) (* (cos phi1) (cos phi2)))>
#<alt (* (cos lambda1) (* (cos phi1) (cos phi2)))>
#<alt (* (cos lambda1) (* (cos phi1) (cos phi2)))>
#<alt (* (cos lambda1) (* (cos phi1) (cos phi2)))>
#<alt (* (cos lambda1) (* (cos phi1) (cos phi2)))>
#<alt (* (cos lambda1) (* (cos phi1) (cos phi2)))>
#<alt (* (cos lambda1) (* (cos phi1) (cos phi2)))>
#<alt (* (cos lambda1) (* (cos phi1) (cos phi2)))>
#<alt (* (cos lambda1) (cos phi1))>
#<alt (+ (* -1/2 (* (pow phi2 2) (* (cos lambda1) (cos phi1)))) (* (cos lambda1) (cos phi1)))>
#<alt (+ (* (cos lambda1) (cos phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda1) (cos phi1))) (* 1/24 (* (pow phi2 2) (* (cos lambda1) (cos phi1)))))))>
#<alt (+ (* (cos lambda1) (cos phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda1) (cos phi1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos lambda1) (cos phi1)))) (* 1/24 (* (cos lambda1) (cos phi1))))))))>
#<alt (* (cos lambda1) (* (cos phi1) (cos phi2)))>
#<alt (* (cos lambda1) (* (cos phi1) (cos phi2)))>
#<alt (* (cos lambda1) (* (cos phi1) (cos phi2)))>
#<alt (* (cos lambda1) (* (cos phi1) (cos phi2)))>
#<alt (* (cos lambda1) (* (cos phi1) (cos phi2)))>
#<alt (* (cos lambda1) (* (cos phi1) (cos phi2)))>
#<alt (* (cos lambda1) (* (cos phi1) (cos phi2)))>
#<alt (* (cos lambda1) (* (cos phi1) (cos phi2)))>
#<alt (* (cos phi1) (cos phi2))>
#<alt (+ (* -1/2 (* (pow lambda1 2) (* (cos phi1) (cos phi2)))) (* (cos phi1) (cos phi2)))>
#<alt (+ (* (cos phi1) (cos phi2)) (* (pow lambda1 2) (+ (* -1/2 (* (cos phi1) (cos phi2))) (* 1/24 (* (pow lambda1 2) (* (cos phi1) (cos phi2)))))))>
#<alt (+ (* (cos phi1) (cos phi2)) (* (pow lambda1 2) (+ (* -1/2 (* (cos phi1) (cos phi2))) (* (pow lambda1 2) (+ (* -1/720 (* (pow lambda1 2) (* (cos phi1) (cos phi2)))) (* 1/24 (* (cos phi1) (cos phi2))))))))>
#<alt (* (cos lambda1) (* (cos phi1) (cos phi2)))>
#<alt (* (cos lambda1) (* (cos phi1) (cos phi2)))>
#<alt (* (cos lambda1) (* (cos phi1) (cos phi2)))>
#<alt (* (cos lambda1) (* (cos phi1) (cos phi2)))>
#<alt (* (cos lambda1) (* (cos phi1) (cos phi2)))>
#<alt (* (cos lambda1) (* (cos phi1) (cos phi2)))>
#<alt (* (cos lambda1) (* (cos phi1) (cos phi2)))>
#<alt (* (cos lambda1) (* (cos phi1) (cos phi2)))>
#<alt (cos (neg lambda2))>
#<alt (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))>
#<alt (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))>
#<alt (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))>
#<alt (cos (- lambda1 lambda2))>
#<alt (cos (- lambda1 lambda2))>
#<alt (cos (- lambda1 lambda2))>
#<alt (cos (- lambda1 lambda2))>
#<alt (cos (neg (+ lambda2 (* -1 lambda1))))>
#<alt (cos (neg (+ lambda2 (* -1 lambda1))))>
#<alt (cos (neg (+ lambda2 (* -1 lambda1))))>
#<alt (cos (neg (+ lambda2 (* -1 lambda1))))>
#<alt (cos lambda1)>
#<alt (+ (cos lambda1) (* lambda2 (sin lambda1)))>
#<alt (+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))>
#<alt (+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))>
#<alt (cos (- lambda1 lambda2))>
#<alt (cos (- lambda1 lambda2))>
#<alt (cos (- lambda1 lambda2))>
#<alt (cos (- lambda1 lambda2))>
#<alt (cos (+ lambda1 (* -1 lambda2)))>
#<alt (cos (+ lambda1 (* -1 lambda2)))>
#<alt (cos (+ lambda1 (* -1 lambda2)))>
#<alt (cos (+ lambda1 (* -1 lambda2)))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (* lambda1 (sin lambda2))>
#<alt (* lambda1 (+ (sin lambda2) (* -1/6 (* (pow lambda1 2) (sin lambda2)))))>
#<alt (* lambda1 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/6 (sin lambda2)) (* 1/120 (* (pow lambda1 2) (sin lambda2)))))))>
#<alt (* lambda1 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/6 (sin lambda2)) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (sin lambda2))) (* 1/120 (sin lambda2))))))))>
#<alt (* (sin lambda1) (sin lambda2))>
#<alt (* (sin lambda1) (sin lambda2))>
#<alt (* (sin lambda1) (sin lambda2))>
#<alt (* (sin lambda1) (sin lambda2))>
#<alt (* (sin lambda1) (sin lambda2))>
#<alt (* (sin lambda1) (sin lambda2))>
#<alt (* (sin lambda1) (sin lambda2))>
#<alt (* (sin lambda1) (sin lambda2))>
#<alt (* lambda2 (sin lambda1))>
#<alt (* lambda2 (+ (sin lambda1) (* -1/6 (* (pow lambda2 2) (sin lambda1)))))>
#<alt (* lambda2 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/6 (sin lambda1)) (* 1/120 (* (pow lambda2 2) (sin lambda1)))))))>
#<alt (* lambda2 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/6 (sin lambda1)) (* (pow lambda2 2) (+ (* -1/5040 (* (pow lambda2 2) (sin lambda1))) (* 1/120 (sin lambda1))))))))>
#<alt (* (sin lambda1) (sin lambda2))>
#<alt (* (sin lambda1) (sin lambda2))>
#<alt (* (sin lambda1) (sin lambda2))>
#<alt (* (sin lambda1) (sin lambda2))>
#<alt (* (sin lambda1) (sin lambda2))>
#<alt (* (sin lambda1) (sin lambda2))>
#<alt (* (sin lambda1) (sin lambda2))>
#<alt (* (sin lambda1) (sin lambda2))>
Calls

246 calls:

TimeVariablePointExpression
13.0ms
phi2
@inf
(* (acos (+ (+ (* (sin phi1) (sin phi2)) (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2))) (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))) R)
6.0ms
lambda2
@-inf
(* (acos (* (cos phi1) (cos (- lambda2 lambda1)))) R)
4.0ms
lambda2
@-inf
(+ (+ (* (sin phi1) (sin phi2)) (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2))) (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
3.0ms
phi2
@-inf
(* (sin phi1) (sin phi2))
3.0ms
lambda2
@-inf
(+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))))

rewrite677.0ms (2.8%)

Memory
15.1MiB live, 926.2MiB allocated
Algorithm
1×batch-egg-rewrite
Rules
6 650×accelerator-lowering-fma.f32
6 650×accelerator-lowering-fma.f64
4 610×*-lowering-*.f32
4 610×*-lowering-*.f64
3 650×/-lowering-/.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
054294
1298294
22529294
09570281
Stop Event
1×iter limit
1×node limit
Counts
26 → 909
Calls
Call 1
Inputs
(+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))
(* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))))) R)
(acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))))
(+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))))
(* (acos (* (cos phi1) (cos (- lambda2 lambda1)))) R)
(acos (* (cos phi1) (cos (- lambda2 lambda1))))
(* (cos phi1) (cos (- lambda2 lambda1)))
(cos phi1)
(* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos lambda1)))) R)
(acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos lambda1))))
(+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos lambda1)))
(* (sin phi1) (sin phi2))
(+ (* (/ (PI) 2) R) (* (- 0 (asin (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))) R))
(/ (PI) 2)
(PI)
(* (- 0 (asin (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))) R)
(+ (+ (* (sin phi1) (sin phi2)) (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2))) (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
(* (acos (+ (+ (* (sin phi1) (sin phi2)) (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2))) (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))) R)
(acos (+ (+ (* (sin phi1) (sin phi2)) (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2))) (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2))))))
(+ (* (sin phi1) (sin phi2)) (* (* (* (cos lambda1) (cos lambda2)) (cos phi1)) (cos phi2)))
(* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))
(cos (- lambda2 lambda1))
(* (* (cos phi1) (cos phi2)) (cos lambda1))
(cos (- lambda1 lambda2))
(asin (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(* (sin lambda1) (sin lambda2))
Outputs
(+.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (+.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 (+.f64 lambda2 lambda1))))) (cos.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (+.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 (+.f64 lambda2 lambda1)))))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (+.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 (+.f64 lambda2 lambda1))))) (sin.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (+.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 (+.f64 lambda2 lambda1)))))))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1)))))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda2 lambda1))))) (cos.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda2 lambda1)))))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda2 lambda1))))) (sin.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda2 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)))))
(cos.f64 (-.f64 lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda1))))
(-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))))
(-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 (-.f64 #s(literal 0 binary64) lambda1)) (sin.f64 lambda2)))
(-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)) (sin.f64 lambda1)))
(-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (cos.f64 (+.f64 lambda2 lambda1))))
(-.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(fma.f64 (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(fma.f64 (cos.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda2 lambda1))))) (cos.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda2 lambda1))))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda2 lambda1))))) (sin.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda2 lambda1)))))))
(fma.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1)))))
(fma.f64 (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1)))))
(fma.f64 (cos.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (+.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 (+.f64 lambda2 lambda1))))) (cos.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (+.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 (+.f64 lambda2 lambda1))))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (+.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 (+.f64 lambda2 lambda1))))) (sin.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (+.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 (+.f64 lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 lambda2 lambda1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (cos.f64 (+.f64 lambda2 lambda1)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (cos.f64 (+.f64 lambda2 lambda1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))))))
(/.f64 (+.f64 (*.f64 (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))))) #s(literal 4 binary64))
(/.f64 (+.f64 (*.f64 (-.f64 (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 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))))
(/.f64 (neg.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) (neg.f64 (cos.f64 (+.f64 lambda2 lambda1))))
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))))) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))
(/.f64 (neg.f64 (+.f64 (*.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 (neg.f64 (+.f64 (*.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 (neg.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))))) (neg.f64 (neg.f64 (cos.f64 (+.f64 lambda2 lambda1)))))
(/.f64 (neg.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))))) (neg.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))
(pow.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (cos.f64 (+.f64 lambda2 lambda1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) #s(literal -1 binary64))
(*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda2 lambda1))))
(+.f64 (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))) (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)))
(+.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))))
(-.f64 (/.f64 (/.f64 (*.f64 (*.f64 R (PI.f64)) (*.f64 R (PI.f64))) #s(literal 4 binary64)) (*.f64 R (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))))) (/.f64 (pow.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) #s(literal 2 binary64)) (*.f64 R (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.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 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) #s(literal 2 binary64)) (-.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))))) (/.f64 (/.f64 (*.f64 (*.f64 R (PI.f64)) (*.f64 R (PI.f64))) #s(literal 4 binary64)) (-.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))))))
(fma.f64 R (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)))
(fma.f64 R (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))))
(fma.f64 (PI.f64) (*.f64 #s(literal 1/2 binary64) R) (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)))
(fma.f64 (PI.f64) (/.f64 R #s(literal 2 binary64)) (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)))
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)))
(fma.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) R (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))))
(fma.f64 #s(literal 1/2 binary64) (/.f64 R (/.f64 #s(literal 1 binary64) (PI.f64))) (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)))
(fma.f64 (*.f64 R (PI.f64)) #s(literal 1/2 binary64) (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)))
(fma.f64 (/.f64 R #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (PI.f64))) (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)))
(fma.f64 (/.f64 R (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64))) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))))
(fma.f64 (/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64))) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (/.f64 R (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (/.f64 (*.f64 (*.f64 R (PI.f64)) (*.f64 R (PI.f64))) #s(literal 4 binary64)) (*.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) (-.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64)))))) (+.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 R (*.f64 R R))) #s(literal 8 binary64)) (neg.f64 (pow.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R) #s(literal 3 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 R (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.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 R (PI.f64)) (*.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) #s(literal 2 binary64)))))
(/.f64 (+.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 R (*.f64 R R))) #s(literal 8 binary64)) (neg.f64 (pow.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R) #s(literal 3 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 R (PI.f64)) (*.f64 R (PI.f64))) #s(literal 4 binary64)) (*.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) (-.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64)))))))
(/.f64 (+.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 R (*.f64 R R))) #s(literal 8 binary64)) (neg.f64 (pow.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R) #s(literal 3 binary64)))) (+.f64 (pow.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 R (PI.f64)) (*.f64 R (PI.f64))) #s(literal 4 binary64)) (*.f64 (*.f64 (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))) R) (-.f64 #s(literal 0 binary64) (asin.f64 (+.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 (*.f64 R (PI.f64)) (*.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) #s(literal 2 binary64))) (*.f64 R (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (/.f64 (*.f64 (*.f64 R (PI.f64)) (*.f64 R (PI.f64))) #s(literal 4 binary64)) (*.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) (-.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64)))))) (+.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 R (*.f64 R R))) #s(literal 8 binary64)) (neg.f64 (pow.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R) #s(literal 3 binary64)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 R (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.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 R (PI.f64)) (*.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (+.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 R (*.f64 R R))) #s(literal 8 binary64)) (neg.f64 (pow.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R) #s(literal 3 binary64))))) (neg.f64 (+.f64 (/.f64 (*.f64 (*.f64 R (PI.f64)) (*.f64 R (PI.f64))) #s(literal 4 binary64)) (*.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) (-.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))))))))
(/.f64 (neg.f64 (+.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 R (*.f64 R R))) #s(literal 8 binary64)) (neg.f64 (pow.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R) #s(literal 3 binary64))))) (neg.f64 (+.f64 (pow.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 R (PI.f64)) (*.f64 R (PI.f64))) #s(literal 4 binary64)) (*.f64 (*.f64 (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))) R) (-.f64 #s(literal 0 binary64) (asin.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 (/.f64 (*.f64 (*.f64 R (PI.f64)) (*.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) #s(literal 2 binary64)))) (neg.f64 (*.f64 R (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.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 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 R (PI.f64)) (*.f64 R (PI.f64))) #s(literal 4 binary64))) (-.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64)))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 R (*.f64 R R))) #s(literal 8 binary64)) (neg.f64 (pow.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R) #s(literal 3 binary64)))))) (neg.f64 (neg.f64 (+.f64 (/.f64 (*.f64 (*.f64 R (PI.f64)) (*.f64 R (PI.f64))) #s(literal 4 binary64)) (*.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) (-.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64)))))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (/.f64 (*.f64 (*.f64 R (PI.f64)) (*.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (*.f64 R (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.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 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 R (PI.f64)) (*.f64 R (PI.f64))) #s(literal 4 binary64)))) (neg.f64 (-.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))))))
(pow.f64 (/.f64 (+.f64 (/.f64 (*.f64 (*.f64 R (PI.f64)) (*.f64 R (PI.f64))) #s(literal 4 binary64)) (*.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) (-.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64)))))) (+.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 R (*.f64 R R))) #s(literal 8 binary64)) (neg.f64 (pow.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R) #s(literal 3 binary64))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 R (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.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 R (PI.f64)) (*.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) #s(literal 2 binary64)))) #s(literal -1 binary64))
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)
(*.f64 R (acos.f64 (+.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 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 R (*.f64 R R))) #s(literal 8 binary64)) (neg.f64 (pow.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 R (PI.f64)) (*.f64 R (PI.f64))) #s(literal 4 binary64)) (*.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) (-.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))))))))
(*.f64 (-.f64 (/.f64 (*.f64 (*.f64 R (PI.f64)) (*.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 R (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))))))
(*.f64 (/.f64 (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R) R) (/.f64 (*.f64 R (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(+.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (/.f64 (PI.f64) #s(literal 2 binary64)))
(+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 0 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(+.f64 (/.f64 #s(literal 0 binary64) (/.f64 #s(literal 2 binary64) (PI.f64))) (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 0 binary64)) (asin.f64 (+.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 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal 8 binary64)) (+.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))))) (/.f64 (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64)) (+.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.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 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))) (/.f64 (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.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 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) (/.f64 (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(fma.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(fma.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(fma.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(fma.f64 (sqrt.f64 (PI.f64)) (*.f64 (sqrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(fma.f64 (-.f64 #s(literal 0 binary64) (PI.f64)) #s(literal -1/2 binary64) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64))) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal -2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)))
(fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(fma.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (/.f64 (PI.f64) #s(literal 2 binary64)))
(fma.f64 #s(literal -1 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) (/.f64 (PI.f64) #s(literal 2 binary64)))
(/.f64 (+.f64 (*.f64 (PI.f64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64))))) (*.f64 #s(literal 2 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (PI.f64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64))) (*.f64 (/.f64 #s(literal 2 binary64) (PI.f64)) (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64))))) (*.f64 (/.f64 #s(literal 2 binary64) (PI.f64)) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (*.f64 (/.f64 #s(literal 2 binary64) (PI.f64)) (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64))))) (*.f64 (/.f64 #s(literal 2 binary64) (PI.f64)) (asin.f64 (+.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 #s(literal 0 binary64) (PI.f64)) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64))))) (*.f64 #s(literal -2 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (*.f64 #s(literal -2 binary64) (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64))))) (*.f64 #s(literal -2 binary64) (asin.f64 (+.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 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal 8 binary64)) (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64)))) (+.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.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 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal 8 binary64)) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.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 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64))) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.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 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.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 (*.f64 (PI.f64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64)))))) (neg.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)))))) (neg.f64 (*.f64 #s(literal 2 binary64) (asin.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 (*.f64 #s(literal 1 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64))) (*.f64 (/.f64 #s(literal 2 binary64) (PI.f64)) (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64)))))) (neg.f64 (*.f64 (/.f64 #s(literal 2 binary64) (PI.f64)) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (*.f64 #s(literal 1 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (*.f64 (/.f64 #s(literal 2 binary64) (PI.f64)) (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)))))) (neg.f64 (*.f64 (/.f64 #s(literal 2 binary64) (PI.f64)) (asin.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 (*.f64 (-.f64 #s(literal 0 binary64) (PI.f64)) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64)))))) (neg.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (*.f64 #s(literal -2 binary64) (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)))))) (neg.f64 (*.f64 #s(literal -2 binary64) (asin.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 (/.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal 8 binary64)) (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64))))) (neg.f64 (+.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.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 (/.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal 8 binary64)) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.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 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.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 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)))) (neg.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))))
(/.f64 (+.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64))) (/.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal 8 binary64))) (+.f64 (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)) (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 0 binary64)) #s(literal 3 binary64)) (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64)))) (+.f64 (*.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 0 binary64)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 0 binary64))) (-.f64 (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)) (*.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 0 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.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 (/.f64 #s(literal 0 binary64) (/.f64 #s(literal 2 binary64) (PI.f64))) #s(literal 3 binary64)) (pow.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 #s(literal 0 binary64) (/.f64 #s(literal 2 binary64) (PI.f64))) (/.f64 #s(literal 0 binary64) (/.f64 #s(literal 2 binary64) (PI.f64)))) (-.f64 (pow.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)) (*.f64 (/.f64 #s(literal 0 binary64) (/.f64 #s(literal 2 binary64) (PI.f64))) (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))))
(+.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 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (+.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(+.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(+.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(+.f64 (+.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(-.f64 (/.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) (/.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))))
(-.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (-.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 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) (/.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)) (-.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.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 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (+.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (+.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(fma.f64 (cos.f64 lambda1) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (cos.f64 phi2)) (+.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 lambda1) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (cos.f64 phi2)) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(fma.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.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 (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 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(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 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (+.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2)) (+.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2)) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.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 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (+.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(fma.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (+.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.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 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2) (+.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.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 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2) (+.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) (cos.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (-.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (cos.f64 phi1)) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (+.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1) (+.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (+.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) (sin.f64 lambda2) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (+.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (-.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))) (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (-.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.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))))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 3 binary64))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.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))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.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 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (-.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))))
(/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))))
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (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 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64))) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (-.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))) (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (-.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.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))))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (-.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)))) (neg.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.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)))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (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 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64))) (-.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (-.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.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))))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (neg.f64 (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 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))))) (neg.f64 (-.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 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (+.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (+.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (+.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))))
(/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 3 binary64))) (+.f64 (*.f64 (+.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (+.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))))
(pow.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (-.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))) (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (-.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.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))))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.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)))))))
(*.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (-.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))))))
(*.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))) (/.f64 #s(literal 1 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 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))))
(*.f64 R (acos.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))
(*.f64 (acos.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) R)
(acos.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))
(-.f64 (/.f64 (/.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal 8 binary64)) (+.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (pow.f64 (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #s(literal 2 binary64)) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))))) (/.f64 (pow.f64 (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #s(literal 3 binary64)) (+.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (pow.f64 (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #s(literal 2 binary64)) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))))))
(-.f64 (/.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (/.f64 (pow.f64 (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #s(literal 2 binary64)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(fma.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(fma.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(fma.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(fma.f64 (sqrt.f64 (PI.f64)) (*.f64 (sqrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(fma.f64 (-.f64 #s(literal 0 binary64) (PI.f64)) #s(literal -1/2 binary64) (neg.f64 (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(fma.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal -1 binary64)) (neg.f64 (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(/.f64 (-.f64 (/.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal 8 binary64)) (pow.f64 (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (pow.f64 (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #s(literal 2 binary64)) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))))
(/.f64 (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #s(literal 2 binary64))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(/.f64 (neg.f64 (-.f64 (/.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal 8 binary64)) (pow.f64 (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (pow.f64 (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #s(literal 2 binary64)) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #s(literal 2 binary64)))) (neg.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))))
(/.f64 (+.f64 (/.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal 8 binary64)) (pow.f64 (neg.f64 (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 (*.f64 (neg.f64 (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (neg.f64 (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))))))
(+.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(+.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (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 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))))
(+.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)))
(fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)))
(fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)))
(fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.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 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (cos.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (+.f64 (-.f64 phi1 lambda2) lambda1))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (+.f64 (-.f64 phi1 lambda2) lambda1)))))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 (-.f64 lambda2 lambda1) 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 phi1 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 phi1 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (+.f64 (-.f64 phi1 lambda2) lambda1))))))
(/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (+.f64 (-.f64 phi1 lambda2) lambda1)))) #s(literal -2 binary64))
(/.f64 (*.f64 (cos.f64 phi1) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(/.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) (cos.f64 (+.f64 lambda2 lambda1)))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (cos.f64 phi1)) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(/.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (cos.f64 phi1)) (cos.f64 (+.f64 lambda2 lambda1)))
(/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi1)) (cos.f64 (-.f64 (-.f64 lambda1 lambda2) phi1)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 phi1 (-.f64 lambda1 lambda2))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (+.f64 (-.f64 phi1 lambda2) lambda1))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 (cos.f64 phi1) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))))) (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))
(/.f64 (neg.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))))) (neg.f64 (cos.f64 (+.f64 lambda2 lambda1))))
(/.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (cos.f64 phi1))) (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))
(/.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (cos.f64 phi1))) (neg.f64 (cos.f64 (+.f64 lambda2 lambda1))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1))) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1))) (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))))))
(pow.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (+.f64 (-.f64 phi1 lambda2) lambda1)))) #s(literal -1 binary64))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))
(*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))
(*.f64 (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (+.f64 (-.f64 phi1 lambda2) lambda1))) #s(literal 1/2 binary64))
(cos.f64 phi1)
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(-.f64 (/.f64 (/.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal 8 binary64)) (+.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))))) (/.f64 (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64)) (+.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))))))
(-.f64 (/.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) (/.f64 (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(fma.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(fma.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(fma.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(fma.f64 (sqrt.f64 (PI.f64)) (*.f64 (sqrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(fma.f64 (-.f64 #s(literal 0 binary64) (PI.f64)) #s(literal -1/2 binary64) (neg.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(fma.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal -1 binary64)) (neg.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(/.f64 (-.f64 (/.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal 8 binary64)) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))))
(/.f64 (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(/.f64 (neg.f64 (-.f64 (/.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal 8 binary64)) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)))) (neg.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))))
(/.f64 (+.f64 (/.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal 8 binary64)) (pow.f64 (neg.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 (*.f64 (neg.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (neg.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(-.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) (/.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 3 binary64))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))))
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (*.f64 (cos.f64 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 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))))) (neg.f64 (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(pow.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))))
(*.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))) #s(literal 2 binary64))
(pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) #s(literal -1 binary64))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(*.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64))
(+.f64 (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))) (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)))
(+.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))))
(-.f64 (/.f64 (/.f64 (*.f64 (*.f64 R (PI.f64)) (*.f64 R (PI.f64))) #s(literal 4 binary64)) (*.f64 R (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))))) (/.f64 (pow.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) #s(literal 2 binary64)) (*.f64 R (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.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 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) #s(literal 2 binary64)) (-.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))))) (/.f64 (/.f64 (*.f64 (*.f64 R (PI.f64)) (*.f64 R (PI.f64))) #s(literal 4 binary64)) (-.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))))))
(fma.f64 R (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)))
(fma.f64 R (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))))
(fma.f64 (PI.f64) (*.f64 #s(literal 1/2 binary64) R) (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)))
(fma.f64 (PI.f64) (/.f64 R #s(literal 2 binary64)) (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)))
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)))
(fma.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) R (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))))
(fma.f64 #s(literal 1/2 binary64) (/.f64 R (/.f64 #s(literal 1 binary64) (PI.f64))) (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)))
(fma.f64 (*.f64 R (PI.f64)) #s(literal 1/2 binary64) (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)))
(fma.f64 (/.f64 R #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (PI.f64))) (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)))
(fma.f64 (/.f64 R (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64))) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))))
(fma.f64 (/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64))) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (/.f64 R (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (/.f64 (*.f64 (*.f64 R (PI.f64)) (*.f64 R (PI.f64))) #s(literal 4 binary64)) (*.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) (-.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64)))))) (+.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 R (*.f64 R R))) #s(literal 8 binary64)) (neg.f64 (pow.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R) #s(literal 3 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 R (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.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 R (PI.f64)) (*.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) #s(literal 2 binary64)))))
(/.f64 (+.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 R (*.f64 R R))) #s(literal 8 binary64)) (neg.f64 (pow.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R) #s(literal 3 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 R (PI.f64)) (*.f64 R (PI.f64))) #s(literal 4 binary64)) (*.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) (-.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64)))))))
(/.f64 (+.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 R (*.f64 R R))) #s(literal 8 binary64)) (neg.f64 (pow.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R) #s(literal 3 binary64)))) (+.f64 (pow.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 R (PI.f64)) (*.f64 R (PI.f64))) #s(literal 4 binary64)) (*.f64 (*.f64 (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))) R) (-.f64 #s(literal 0 binary64) (asin.f64 (+.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 (*.f64 R (PI.f64)) (*.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) #s(literal 2 binary64))) (*.f64 R (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (/.f64 (*.f64 (*.f64 R (PI.f64)) (*.f64 R (PI.f64))) #s(literal 4 binary64)) (*.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) (-.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64)))))) (+.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 R (*.f64 R R))) #s(literal 8 binary64)) (neg.f64 (pow.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R) #s(literal 3 binary64)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 R (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.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 R (PI.f64)) (*.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (+.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 R (*.f64 R R))) #s(literal 8 binary64)) (neg.f64 (pow.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R) #s(literal 3 binary64))))) (neg.f64 (+.f64 (/.f64 (*.f64 (*.f64 R (PI.f64)) (*.f64 R (PI.f64))) #s(literal 4 binary64)) (*.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) (-.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))))))))
(/.f64 (neg.f64 (+.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 R (*.f64 R R))) #s(literal 8 binary64)) (neg.f64 (pow.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R) #s(literal 3 binary64))))) (neg.f64 (+.f64 (pow.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 R (PI.f64)) (*.f64 R (PI.f64))) #s(literal 4 binary64)) (*.f64 (*.f64 (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))) R) (-.f64 #s(literal 0 binary64) (asin.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 (/.f64 (*.f64 (*.f64 R (PI.f64)) (*.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) #s(literal 2 binary64)))) (neg.f64 (*.f64 R (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.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 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 R (PI.f64)) (*.f64 R (PI.f64))) #s(literal 4 binary64))) (-.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64)))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 R (*.f64 R R))) #s(literal 8 binary64)) (neg.f64 (pow.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R) #s(literal 3 binary64)))))) (neg.f64 (neg.f64 (+.f64 (/.f64 (*.f64 (*.f64 R (PI.f64)) (*.f64 R (PI.f64))) #s(literal 4 binary64)) (*.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) (-.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64)))))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (/.f64 (*.f64 (*.f64 R (PI.f64)) (*.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (*.f64 R (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.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 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 R (PI.f64)) (*.f64 R (PI.f64))) #s(literal 4 binary64)))) (neg.f64 (-.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))))))
(pow.f64 (/.f64 (+.f64 (/.f64 (*.f64 (*.f64 R (PI.f64)) (*.f64 R (PI.f64))) #s(literal 4 binary64)) (*.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) (-.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64)))))) (+.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 R (*.f64 R R))) #s(literal 8 binary64)) (neg.f64 (pow.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R) #s(literal 3 binary64))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 R (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.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 R (PI.f64)) (*.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) #s(literal 2 binary64)))) #s(literal -1 binary64))
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)
(*.f64 R (acos.f64 (+.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 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 R (*.f64 R R))) #s(literal 8 binary64)) (neg.f64 (pow.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 R (PI.f64)) (*.f64 R (PI.f64))) #s(literal 4 binary64)) (*.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) (-.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))))))))
(*.f64 (-.f64 (/.f64 (*.f64 (*.f64 R (PI.f64)) (*.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 R (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))))))
(*.f64 (/.f64 (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R) R) (/.f64 (*.f64 R (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (PI.f64))) #s(literal -1 binary64)))
(-.f64 #s(literal 0 binary64) (/.f64 (PI.f64) #s(literal -2 binary64)))
(neg.f64 (/.f64 (PI.f64) #s(literal -2 binary64)))
(/.f64 (PI.f64) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (PI.f64)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 2 binary64) (PI.f64)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 #s(literal 2 binary64) (PI.f64)))))
(/.f64 (-.f64 #s(literal 0 binary64) (PI.f64)) #s(literal -2 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 2 binary64) (PI.f64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 #s(literal 2 binary64) (PI.f64)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (PI.f64))) #s(literal 2 binary64))
(/.f64 (neg.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (PI.f64)))) #s(literal -2 binary64))
(pow.f64 (/.f64 #s(literal 2 binary64) (PI.f64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 #s(literal 2 binary64) (PI.f64)) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 (PI.f64) #s(literal 1/2 binary64))
(*.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)))
(*.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)))
(*.f64 (sqrt.f64 (PI.f64)) (*.f64 (sqrt.f64 (PI.f64)) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)))
(*.f64 (-.f64 #s(literal 0 binary64) (PI.f64)) #s(literal -1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (PI.f64))
(*.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal -1 binary64)))
(PI.f64)
(log.f64 (exp.f64 (PI.f64)))
(exp.f64 (log.f64 (PI.f64)))
(exp.f64 (*.f64 (*.f64 #s(literal 1/3 binary64) (log.f64 (PI.f64))) #s(literal 3 binary64)))
(exp.f64 (*.f64 (log.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64)))) #s(literal 1/3 binary64)))
(exp.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (PI.f64))) #s(literal 2 binary64)))
(fabs.f64 (PI.f64))
(sqrt.f64 (*.f64 (PI.f64) (PI.f64)))
(cbrt.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))))
(pow.f64 (PI.f64) #s(literal 1 binary64))
(pow.f64 (cbrt.f64 (PI.f64)) #s(literal 3 binary64))
(pow.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/2 binary64))
(pow.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal 1/3 binary64))
(pow.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64))
(pow.f64 (E.f64) (log.f64 (PI.f64)))
(*.f64 (PI.f64) #s(literal 1 binary64))
(*.f64 (PI.f64) (log.f64 (E.f64)))
(*.f64 #s(literal 1 binary64) (PI.f64))
(*.f64 (cbrt.f64 (PI.f64)) (pow.f64 (PI.f64) #s(literal 2/3 binary64)))
(*.f64 (cbrt.f64 (PI.f64)) (log.f64 (exp.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)))))
(*.f64 (cbrt.f64 (PI.f64)) (sqrt.f64 (pow.f64 (PI.f64) #s(literal 4/3 binary64))))
(*.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (cbrt.f64 (PI.f64)))
(*.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (pow.f64 (pow.f64 (PI.f64) #s(literal 1/6 binary64)) #s(literal 2 binary64)))
(*.f64 (sqrt.f64 (PI.f64)) (sqrt.f64 (PI.f64)))
(*.f64 (sqrt.f64 (PI.f64)) (log.f64 (exp.f64 (sqrt.f64 (PI.f64)))))
(*.f64 (pow.f64 (PI.f64) #s(literal 1/4 binary64)) (sqrt.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64))))
(*.f64 (pow.f64 (pow.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) #s(literal 1/3 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 1/3 binary64)) #s(literal 3 binary64)))
(*.f64 (pow.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 1/3 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 1/3 binary64)) #s(literal 3 binary64)))
(*.f64 (pow.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) #s(literal 1/3 binary64)) (pow.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) #s(literal 1/3 binary64)))
(*.f64 (pow.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (pow.f64 (PI.f64) #s(literal 2/3 binary64))) #s(literal 1/3 binary64)) (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 1/3 binary64)))
(*.f64 (pow.f64 (pow.f64 (PI.f64) #s(literal 5/2 binary64)) #s(literal 1/3 binary64)) (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 1/3 binary64)))
(*.f64 (exp.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) (log.f64 (PI.f64))))) (exp.f64 (*.f64 #s(literal 1/3 binary64) (log.f64 (PI.f64)))))
(*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (PI.f64)))) (exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (PI.f64)))))
(*.f64 (cbrt.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64))) (cbrt.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64))))
(*.f64 (cbrt.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (pow.f64 (PI.f64) #s(literal 2/3 binary64)))) (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 1/3 binary64)))
(*.f64 (cbrt.f64 (pow.f64 (PI.f64) #s(literal 5/2 binary64))) (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 1/3 binary64)))
(*.f64 (sqrt.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64))) (pow.f64 (PI.f64) #s(literal 1/4 binary64)))
(*.f64 (sqrt.f64 (cbrt.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (PI.f64) (PI.f64))))) (cbrt.f64 (PI.f64)))
(*.f64 (sqrt.f64 (*.f64 (PI.f64) (pow.f64 (PI.f64) #s(literal 2/3 binary64)))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)))
(+.f64 (*.f64 R #s(literal 0 binary64)) (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)))
(+.f64 (*.f64 #s(literal 0 binary64) R) (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)))
(fma.f64 R #s(literal 0 binary64) (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)))
(fma.f64 #s(literal 0 binary64) R (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)))
(neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R))
(neg.f64 (*.f64 R (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(/.f64 (*.f64 R (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64)))) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)))
(/.f64 (*.f64 R (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)))) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64))) R) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64))) R) (asin.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 R (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64))))) (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 R (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) (asin.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 (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64))) R)) (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64))) R)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.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 (*.f64 R #s(literal 0 binary64)) #s(literal 3 binary64)) (neg.f64 (pow.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R) #s(literal 3 binary64)))) (+.f64 (*.f64 (*.f64 R #s(literal 0 binary64)) (*.f64 R #s(literal 0 binary64))) (-.f64 (pow.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) #s(literal 2 binary64)) (*.f64 (*.f64 R #s(literal 0 binary64)) (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R))))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 0 binary64) R) #s(literal 3 binary64)) (neg.f64 (pow.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R) #s(literal 3 binary64)))) (+.f64 (*.f64 (*.f64 #s(literal 0 binary64) R) (*.f64 #s(literal 0 binary64) R)) (-.f64 (pow.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 0 binary64) R) (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R))))))
(*.f64 R (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) R)
(*.f64 (/.f64 R (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64))) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(*.f64 (/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64))) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (/.f64 R (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(+.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 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (+.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(+.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(+.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(+.f64 (+.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(-.f64 (/.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) (/.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))))
(-.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (-.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 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) (/.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)) (-.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.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 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (+.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (+.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(fma.f64 (cos.f64 lambda1) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (cos.f64 phi2)) (+.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 lambda1) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (cos.f64 phi2)) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(fma.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.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 (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 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(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 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (+.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2)) (+.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2)) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.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 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (+.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(fma.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (+.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.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 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2) (+.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.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 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2) (+.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) (cos.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (-.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (cos.f64 phi1)) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (+.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1) (+.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (+.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) (sin.f64 lambda2) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (+.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (-.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))) (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (-.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.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))))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 3 binary64))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.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))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.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 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (-.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))))
(/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))))
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (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 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64))) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (-.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))) (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (-.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.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))))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (-.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)))) (neg.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.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)))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (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 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64))) (-.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (-.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.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))))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))))) (neg.f64 (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 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))))) (neg.f64 (-.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 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (+.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (+.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (+.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))))
(/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 3 binary64))) (+.f64 (*.f64 (+.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (+.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))))
(pow.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (-.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))) (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (-.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.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))))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.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)))))))
(*.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (-.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))))))
(*.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))) (/.f64 #s(literal 1 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 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (-.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))))
(+.f64 (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))) (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)))
(+.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))))
(-.f64 (/.f64 (/.f64 (*.f64 (*.f64 R (PI.f64)) (*.f64 R (PI.f64))) #s(literal 4 binary64)) (*.f64 R (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))))) (/.f64 (pow.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) #s(literal 2 binary64)) (*.f64 R (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.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 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) #s(literal 2 binary64)) (-.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))))) (/.f64 (/.f64 (*.f64 (*.f64 R (PI.f64)) (*.f64 R (PI.f64))) #s(literal 4 binary64)) (-.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))))))
(fma.f64 R (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)))
(fma.f64 R (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))))
(fma.f64 (PI.f64) (*.f64 #s(literal 1/2 binary64) R) (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)))
(fma.f64 (PI.f64) (/.f64 R #s(literal 2 binary64)) (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)))
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)))
(fma.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) R (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))))
(fma.f64 #s(literal 1/2 binary64) (/.f64 R (/.f64 #s(literal 1 binary64) (PI.f64))) (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)))
(fma.f64 (*.f64 R (PI.f64)) #s(literal 1/2 binary64) (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)))
(fma.f64 (/.f64 R #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (PI.f64))) (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)))
(fma.f64 (/.f64 R (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64))) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))))
(fma.f64 (/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64))) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (/.f64 R (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (/.f64 (*.f64 (*.f64 R (PI.f64)) (*.f64 R (PI.f64))) #s(literal 4 binary64)) (*.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) (-.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64)))))) (+.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 R (*.f64 R R))) #s(literal 8 binary64)) (neg.f64 (pow.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R) #s(literal 3 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 R (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.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 R (PI.f64)) (*.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) #s(literal 2 binary64)))))
(/.f64 (+.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 R (*.f64 R R))) #s(literal 8 binary64)) (neg.f64 (pow.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R) #s(literal 3 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 R (PI.f64)) (*.f64 R (PI.f64))) #s(literal 4 binary64)) (*.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) (-.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64)))))))
(/.f64 (+.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 R (*.f64 R R))) #s(literal 8 binary64)) (neg.f64 (pow.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R) #s(literal 3 binary64)))) (+.f64 (pow.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 R (PI.f64)) (*.f64 R (PI.f64))) #s(literal 4 binary64)) (*.f64 (*.f64 (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))) R) (-.f64 #s(literal 0 binary64) (asin.f64 (+.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 (*.f64 R (PI.f64)) (*.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) #s(literal 2 binary64))) (*.f64 R (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (/.f64 (*.f64 (*.f64 R (PI.f64)) (*.f64 R (PI.f64))) #s(literal 4 binary64)) (*.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) (-.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64)))))) (+.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 R (*.f64 R R))) #s(literal 8 binary64)) (neg.f64 (pow.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R) #s(literal 3 binary64)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 R (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.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 R (PI.f64)) (*.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (+.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 R (*.f64 R R))) #s(literal 8 binary64)) (neg.f64 (pow.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R) #s(literal 3 binary64))))) (neg.f64 (+.f64 (/.f64 (*.f64 (*.f64 R (PI.f64)) (*.f64 R (PI.f64))) #s(literal 4 binary64)) (*.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) (-.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))))))))
(/.f64 (neg.f64 (+.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 R (*.f64 R R))) #s(literal 8 binary64)) (neg.f64 (pow.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R) #s(literal 3 binary64))))) (neg.f64 (+.f64 (pow.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 R (PI.f64)) (*.f64 R (PI.f64))) #s(literal 4 binary64)) (*.f64 (*.f64 (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))) R) (-.f64 #s(literal 0 binary64) (asin.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 (/.f64 (*.f64 (*.f64 R (PI.f64)) (*.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) #s(literal 2 binary64)))) (neg.f64 (*.f64 R (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.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 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 R (PI.f64)) (*.f64 R (PI.f64))) #s(literal 4 binary64))) (-.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64)))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 R (*.f64 R R))) #s(literal 8 binary64)) (neg.f64 (pow.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R) #s(literal 3 binary64)))))) (neg.f64 (neg.f64 (+.f64 (/.f64 (*.f64 (*.f64 R (PI.f64)) (*.f64 R (PI.f64))) #s(literal 4 binary64)) (*.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) (-.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64)))))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (/.f64 (*.f64 (*.f64 R (PI.f64)) (*.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (*.f64 R (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.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 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 R (PI.f64)) (*.f64 R (PI.f64))) #s(literal 4 binary64)))) (neg.f64 (-.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))))))
(pow.f64 (/.f64 (+.f64 (/.f64 (*.f64 (*.f64 R (PI.f64)) (*.f64 R (PI.f64))) #s(literal 4 binary64)) (*.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) (-.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64)))))) (+.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 R (*.f64 R R))) #s(literal 8 binary64)) (neg.f64 (pow.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R) #s(literal 3 binary64))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 R (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.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 R (PI.f64)) (*.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) #s(literal 2 binary64)))) #s(literal -1 binary64))
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)
(*.f64 R (acos.f64 (+.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 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 R (*.f64 R R))) #s(literal 8 binary64)) (neg.f64 (pow.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 R (PI.f64)) (*.f64 R (PI.f64))) #s(literal 4 binary64)) (*.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) (-.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))))))))
(*.f64 (-.f64 (/.f64 (*.f64 (*.f64 R (PI.f64)) (*.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 R (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))))))
(*.f64 (/.f64 (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R) R) (/.f64 (*.f64 R (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(+.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (/.f64 (PI.f64) #s(literal 2 binary64)))
(+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 0 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(+.f64 (/.f64 #s(literal 0 binary64) (/.f64 #s(literal 2 binary64) (PI.f64))) (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 0 binary64)) (asin.f64 (+.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 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal 8 binary64)) (+.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))))) (/.f64 (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64)) (+.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.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 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))) (/.f64 (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.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 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) (/.f64 (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(fma.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(fma.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(fma.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(fma.f64 (sqrt.f64 (PI.f64)) (*.f64 (sqrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(fma.f64 (-.f64 #s(literal 0 binary64) (PI.f64)) #s(literal -1/2 binary64) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64))) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal -2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)))
(fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(fma.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (/.f64 (PI.f64) #s(literal 2 binary64)))
(fma.f64 #s(literal -1 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) (/.f64 (PI.f64) #s(literal 2 binary64)))
(/.f64 (+.f64 (*.f64 (PI.f64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64))))) (*.f64 #s(literal 2 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (PI.f64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64))) (*.f64 (/.f64 #s(literal 2 binary64) (PI.f64)) (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64))))) (*.f64 (/.f64 #s(literal 2 binary64) (PI.f64)) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (*.f64 (/.f64 #s(literal 2 binary64) (PI.f64)) (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64))))) (*.f64 (/.f64 #s(literal 2 binary64) (PI.f64)) (asin.f64 (+.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 #s(literal 0 binary64) (PI.f64)) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64))))) (*.f64 #s(literal -2 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (*.f64 #s(literal -2 binary64) (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64))))) (*.f64 #s(literal -2 binary64) (asin.f64 (+.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 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal 8 binary64)) (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64)))) (+.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.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 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal 8 binary64)) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.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 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64))) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.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 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.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 (*.f64 (PI.f64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64)))))) (neg.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)))))) (neg.f64 (*.f64 #s(literal 2 binary64) (asin.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 (*.f64 #s(literal 1 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64))) (*.f64 (/.f64 #s(literal 2 binary64) (PI.f64)) (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64)))))) (neg.f64 (*.f64 (/.f64 #s(literal 2 binary64) (PI.f64)) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (*.f64 #s(literal 1 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (*.f64 (/.f64 #s(literal 2 binary64) (PI.f64)) (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)))))) (neg.f64 (*.f64 (/.f64 #s(literal 2 binary64) (PI.f64)) (asin.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 (*.f64 (-.f64 #s(literal 0 binary64) (PI.f64)) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64)))))) (neg.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (*.f64 #s(literal -2 binary64) (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)))))) (neg.f64 (*.f64 #s(literal -2 binary64) (asin.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 (/.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal 8 binary64)) (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64))))) (neg.f64 (+.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.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 (/.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal 8 binary64)) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.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 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.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 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)))) (neg.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))))
(/.f64 (+.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64))) (/.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal 8 binary64))) (+.f64 (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)) (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 0 binary64)) #s(literal 3 binary64)) (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64)))) (+.f64 (*.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 0 binary64)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 0 binary64))) (-.f64 (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)) (*.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 0 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.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 (/.f64 #s(literal 0 binary64) (/.f64 #s(literal 2 binary64) (PI.f64))) #s(literal 3 binary64)) (pow.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 #s(literal 0 binary64) (/.f64 #s(literal 2 binary64) (PI.f64))) (/.f64 #s(literal 0 binary64) (/.f64 #s(literal 2 binary64) (PI.f64)))) (-.f64 (pow.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)) (*.f64 (/.f64 #s(literal 0 binary64) (/.f64 #s(literal 2 binary64) (PI.f64))) (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(+.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(-.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (/.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (-.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 lambda1) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2)) (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) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (-.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 3 binary64))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (-.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 phi2) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))))
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (-.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (-.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 phi2) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 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 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))) (-.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (-.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))))) (neg.f64 (-.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(pow.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (-.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (-.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))))
(*.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(+.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(+.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (/.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (cos.f64 lambda1) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (cos.f64 phi1)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda2 lambda1))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64))
(/.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (-.f64 phi2 lambda1) lambda2)))) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(/.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) (cos.f64 (+.f64 lambda2 lambda1)))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(/.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 (+.f64 lambda2 lambda1)))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (-.f64 phi2 lambda1) lambda2))) (cos.f64 phi1)) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))))) (neg.f64 (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))))) (neg.f64 (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))))) (neg.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))))
(/.f64 (neg.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))))) (neg.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda2 lambda1)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(/.f64 (neg.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (-.f64 phi2 lambda1) lambda2))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))))) (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))
(/.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))))) (neg.f64 (cos.f64 (+.f64 lambda2 lambda1))))
(/.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))
(/.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (neg.f64 (cos.f64 (+.f64 lambda2 lambda1))))
(/.f64 (neg.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (-.f64 phi2 lambda1) lambda2))) (cos.f64 phi1))) #s(literal -2 binary64))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))
(+.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (+.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 (+.f64 lambda2 lambda1))))) (cos.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (+.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 (+.f64 lambda2 lambda1)))))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (+.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 (+.f64 lambda2 lambda1))))) (sin.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (+.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 (+.f64 lambda2 lambda1)))))))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1)))))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda2 lambda1))))) (cos.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda2 lambda1)))))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda2 lambda1))))) (sin.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda2 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)))))
(cos.f64 (-.f64 lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda1))))
(-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))))
(-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 (-.f64 #s(literal 0 binary64) lambda1)) (sin.f64 lambda2)))
(-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)) (sin.f64 lambda1)))
(-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (cos.f64 (+.f64 lambda2 lambda1))))
(-.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(fma.f64 (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(fma.f64 (cos.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda2 lambda1))))) (cos.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda2 lambda1))))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda2 lambda1))))) (sin.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda2 lambda1)))))))
(fma.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1)))))
(fma.f64 (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1)))))
(fma.f64 (cos.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (+.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 (+.f64 lambda2 lambda1))))) (cos.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (+.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 (+.f64 lambda2 lambda1))))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (+.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 (+.f64 lambda2 lambda1))))) (sin.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (+.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 (+.f64 lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 lambda2 lambda1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (cos.f64 (+.f64 lambda2 lambda1)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (cos.f64 (+.f64 lambda2 lambda1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))))))
(/.f64 (+.f64 (*.f64 (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))))) #s(literal 4 binary64))
(/.f64 (+.f64 (*.f64 (-.f64 (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 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))))
(/.f64 (neg.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) (neg.f64 (cos.f64 (+.f64 lambda2 lambda1))))
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))))) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))
(/.f64 (neg.f64 (+.f64 (*.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 (neg.f64 (+.f64 (*.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 (neg.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))))) (neg.f64 (neg.f64 (cos.f64 (+.f64 lambda2 lambda1)))))
(/.f64 (neg.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))))) (neg.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))
(pow.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (cos.f64 (+.f64 lambda2 lambda1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) #s(literal -1 binary64))
(*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda2 lambda1))))
(/.f64 (*.f64 (cos.f64 lambda1) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 lambda1)) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 (cos.f64 lambda1) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 lambda1))) #s(literal -2 binary64))
(*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)))
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1))
(*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1))
(*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi1)) (cos.f64 phi2))
(+.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (+.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 (+.f64 lambda2 lambda1))))) (cos.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (+.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 (+.f64 lambda2 lambda1)))))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (+.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 (+.f64 lambda2 lambda1))))) (sin.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (+.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 (+.f64 lambda2 lambda1)))))))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1)))))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda2 lambda1))))) (cos.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda2 lambda1)))))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda2 lambda1))))) (sin.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda2 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)))))
(cos.f64 (-.f64 lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda1))))
(-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))))
(-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 (-.f64 #s(literal 0 binary64) lambda1)) (sin.f64 lambda2)))
(-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)) (sin.f64 lambda1)))
(-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (cos.f64 (+.f64 lambda2 lambda1))))
(-.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(fma.f64 (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(fma.f64 (cos.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda2 lambda1))))) (cos.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda2 lambda1))))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda2 lambda1))))) (sin.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda2 lambda1)))))))
(fma.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1)))))
(fma.f64 (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1)))))
(fma.f64 (cos.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (+.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 (+.f64 lambda2 lambda1))))) (cos.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (+.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 (+.f64 lambda2 lambda1))))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (+.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 (+.f64 lambda2 lambda1))))) (sin.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (+.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 (+.f64 lambda2 lambda1)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 lambda2 lambda1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (cos.f64 (+.f64 lambda2 lambda1)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (cos.f64 (+.f64 lambda2 lambda1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))))))
(/.f64 (+.f64 (*.f64 (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))))) #s(literal 4 binary64))
(/.f64 (+.f64 (*.f64 (-.f64 (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 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))))
(/.f64 (neg.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) (neg.f64 (cos.f64 (+.f64 lambda2 lambda1))))
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))))) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))
(/.f64 (neg.f64 (+.f64 (*.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 (neg.f64 (+.f64 (*.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 (neg.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))))) (neg.f64 (neg.f64 (cos.f64 (+.f64 lambda2 lambda1)))))
(/.f64 (neg.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))))) (neg.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))
(pow.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (cos.f64 (+.f64 lambda2 lambda1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) #s(literal -1 binary64))
(*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda2 lambda1))))
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(+.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(+.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 0 binary64))
(+.f64 (/.f64 #s(literal 0 binary64) (/.f64 #s(literal 2 binary64) (PI.f64))) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(-.f64 (/.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (/.f64 (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))))
(-.f64 (+.f64 #s(literal 0 binary64) (/.f64 (PI.f64) #s(literal 2 binary64))) (acos.f64 (+.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 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal 8 binary64)) (+.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (pow.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))))) (/.f64 (pow.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64)) (+.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (pow.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (+.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 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) (/.f64 (pow.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(fma.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(fma.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(fma.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(fma.f64 (sqrt.f64 (PI.f64)) (*.f64 (sqrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(fma.f64 (-.f64 #s(literal 0 binary64) (PI.f64)) #s(literal -1/2 binary64) (neg.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(fma.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal -1 binary64)) (neg.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(/.f64 (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (asin.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 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)))) (neg.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))))
(/.f64 (+.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (-.f64 (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)) #s(literal 0 binary64))))
(/.f64 (-.f64 (/.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal 8 binary64)) (pow.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (pow.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (+.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 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.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 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64)))) (neg.f64 (+.f64 #s(literal 0 binary64) (-.f64 (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)) #s(literal 0 binary64)))))
(/.f64 (neg.f64 (-.f64 (/.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal 8 binary64)) (pow.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (pow.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.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 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)))) (neg.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (+.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 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal 8 binary64)) (pow.f64 (neg.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 (*.f64 (neg.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (neg.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (acos.f64 (+.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 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64)) #s(literal 0 binary64)) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)))
(/.f64 (+.f64 (pow.f64 (/.f64 #s(literal 0 binary64) (/.f64 #s(literal 2 binary64) (PI.f64))) #s(literal 3 binary64)) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 #s(literal 0 binary64) (/.f64 #s(literal 2 binary64) (PI.f64))) (/.f64 #s(literal 0 binary64) (/.f64 #s(literal 2 binary64) (PI.f64)))) (-.f64 (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)) (*.f64 (/.f64 #s(literal 0 binary64) (/.f64 #s(literal 2 binary64) (PI.f64))) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))))
(asin.f64 (+.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)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))
(/.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))))))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))))) #s(literal 2 binary64))
(pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) #s(literal -1 binary64))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(*.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 1/2 binary64))

simplify920.0ms (3.7%)

Memory
22.5MiB live, 772.3MiB allocated
Algorithm
1×egg-herbie
Rules
15 872×accelerator-lowering-fma.f32
15 872×accelerator-lowering-fma.f64
8 066×*-lowering-*.f32
8 066×*-lowering-*.f64
3 372×+-lowering-+.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
057618081
1190517670
2628417506
0855816323
Stop Event
1×iter limit
1×node limit
Counts
984 → 984
Calls
Call 1
Inputs
(cos lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(+ (cos lambda1) (* lambda2 (+ (sin lambda1) (* -1/2 (* lambda2 (cos lambda1))))))
(+ (cos lambda1) (* lambda2 (+ (sin lambda1) (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))))))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(cos lambda2)
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))
(+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))))))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ (* phi1 (sin phi2)) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (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)))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin 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 phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (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))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))
(* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))
(* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))
(* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))
(* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))
(* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))
(* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))
(* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))
(* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))
(* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))
(* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))
(* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))
(* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))
(* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))
(* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))
(* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))
(* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))
(* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))
(* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))
(* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))
(* R (acos (* (cos phi1) (cos (neg (+ lambda1 (* -1 lambda2)))))))
(* R (acos (* (cos phi1) (cos (neg (+ lambda1 (* -1 lambda2)))))))
(* R (acos (* (cos phi1) (cos (neg (+ lambda1 (* -1 lambda2)))))))
(* R (acos (* (cos phi1) (cos (neg (+ lambda1 (* -1 lambda2)))))))
(* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))
(* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))
(* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))
(* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))
(* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))
(* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))
(* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))
(* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))
(* R (acos (* (cos phi1) (cos (+ lambda2 (* -1 lambda1))))))
(* R (acos (* (cos phi1) (cos (+ lambda2 (* -1 lambda1))))))
(* R (acos (* (cos phi1) (cos (+ lambda2 (* -1 lambda1))))))
(* R (acos (* (cos phi1) (cos (+ lambda2 (* -1 lambda1))))))
(* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))
(* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))
(* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))
(* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))
(* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))
(* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))
(* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))
(* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))
(* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))
(* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))
(* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))
(* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))
(acos (* (cos phi1) (cos (- lambda2 lambda1))))
(acos (* (cos phi1) (cos (- lambda2 lambda1))))
(acos (* (cos phi1) (cos (- lambda2 lambda1))))
(acos (* (cos phi1) (cos (- lambda2 lambda1))))
(acos (* (cos phi1) (cos (- lambda2 lambda1))))
(acos (* (cos phi1) (cos (- lambda2 lambda1))))
(acos (* (cos phi1) (cos (- lambda2 lambda1))))
(acos (* (cos phi1) (cos (- lambda2 lambda1))))
(acos (* (cos phi1) (cos (- lambda2 lambda1))))
(acos (* (cos phi1) (cos (- lambda2 lambda1))))
(acos (* (cos phi1) (cos (- lambda2 lambda1))))
(acos (* (cos phi1) (cos (- lambda2 lambda1))))
(acos (* (cos phi1) (cos (- lambda2 lambda1))))
(acos (* (cos phi1) (cos (- lambda2 lambda1))))
(acos (* (cos phi1) (cos (- lambda2 lambda1))))
(acos (* (cos phi1) (cos (- lambda2 lambda1))))
(acos (* (cos phi1) (cos (- lambda2 lambda1))))
(acos (* (cos phi1) (cos (- lambda2 lambda1))))
(acos (* (cos phi1) (cos (- lambda2 lambda1))))
(acos (* (cos phi1) (cos (- lambda2 lambda1))))
(acos (* (cos phi1) (cos (neg (+ lambda1 (* -1 lambda2))))))
(acos (* (cos phi1) (cos (neg (+ lambda1 (* -1 lambda2))))))
(acos (* (cos phi1) (cos (neg (+ lambda1 (* -1 lambda2))))))
(acos (* (cos phi1) (cos (neg (+ lambda1 (* -1 lambda2))))))
(acos (* (cos phi1) (cos (- lambda2 lambda1))))
(acos (* (cos phi1) (cos (- lambda2 lambda1))))
(acos (* (cos phi1) (cos (- lambda2 lambda1))))
(acos (* (cos phi1) (cos (- lambda2 lambda1))))
(acos (* (cos phi1) (cos (- lambda2 lambda1))))
(acos (* (cos phi1) (cos (- lambda2 lambda1))))
(acos (* (cos phi1) (cos (- lambda2 lambda1))))
(acos (* (cos phi1) (cos (- lambda2 lambda1))))
(acos (* (cos phi1) (cos (+ lambda2 (* -1 lambda1)))))
(acos (* (cos phi1) (cos (+ lambda2 (* -1 lambda1)))))
(acos (* (cos phi1) (cos (+ lambda2 (* -1 lambda1)))))
(acos (* (cos phi1) (cos (+ lambda2 (* -1 lambda1)))))
(cos (- lambda2 lambda1))
(+ (cos (- lambda2 lambda1)) (* -1/2 (* (pow phi1 2) (cos (- lambda2 lambda1)))))
(+ (cos (- lambda2 lambda1)) (* (pow phi1 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* 1/24 (* (pow phi1 2) (cos (- lambda2 lambda1)))))))
(+ (cos (- lambda2 lambda1)) (* (pow phi1 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (cos (- lambda2 lambda1)))) (* 1/24 (cos (- lambda2 lambda1))))))))
(* (cos phi1) (cos (- lambda2 lambda1)))
(* (cos phi1) (cos (- lambda2 lambda1)))
(* (cos phi1) (cos (- lambda2 lambda1)))
(* (cos phi1) (cos (- lambda2 lambda1)))
(* (cos phi1) (cos (- lambda2 lambda1)))
(* (cos phi1) (cos (- lambda2 lambda1)))
(* (cos phi1) (cos (- lambda2 lambda1)))
(* (cos phi1) (cos (- lambda2 lambda1)))
(* (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 phi1) (cos (- lambda2 lambda1)))
(* (cos phi1) (cos (- lambda2 lambda1)))
(* (cos phi1) (cos (- lambda2 lambda1)))
(* (cos phi1) (cos (- lambda2 lambda1)))
(* (cos phi1) (cos (neg (+ lambda1 (* -1 lambda2)))))
(* (cos phi1) (cos (neg (+ lambda1 (* -1 lambda2)))))
(* (cos phi1) (cos (neg (+ lambda1 (* -1 lambda2)))))
(* (cos phi1) (cos (neg (+ lambda1 (* -1 lambda2)))))
(* (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 (- lambda2 lambda1)))
(* (cos phi1) (cos (- lambda2 lambda1)))
(* (cos phi1) (cos (- lambda2 lambda1)))
(* (cos phi1) (cos (- lambda2 lambda1)))
(* (cos phi1) (cos (+ lambda2 (* -1 lambda1))))
(* (cos phi1) (cos (+ lambda2 (* -1 lambda1))))
(* (cos phi1) (cos (+ lambda2 (* -1 lambda1))))
(* (cos phi1) (cos (+ lambda2 (* -1 lambda1))))
1
(+ 1 (* -1/2 (pow phi1 2)))
(+ 1 (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2)))
(+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2)))
(cos phi1)
(cos phi1)
(cos phi1)
(cos phi1)
(cos phi1)
(cos phi1)
(cos phi1)
(cos phi1)
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(* (cos lambda1) (cos phi2))
(+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2)))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos lambda1) (cos phi2)))))) (* (cos lambda1) (cos phi2)))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos lambda1) (cos phi2)))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(* (cos lambda1) (cos phi1))
(+ (* phi2 (sin phi1)) (* (cos lambda1) (cos phi1)))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos lambda1) (cos phi1)))))) (* (cos lambda1) (cos phi1)))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos lambda1) (cos phi1))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos lambda1) (cos phi1)))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))
(+ (* -1/2 (* (pow lambda1 2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))
(+ (* (cos phi1) (cos phi2)) (+ (* (sin phi1) (sin phi2)) (* (pow lambda1 2) (+ (* -1/2 (* (cos phi1) (cos phi2))) (* 1/24 (* (pow lambda1 2) (* (cos phi1) (cos phi2))))))))
(+ (* (cos phi1) (cos phi2)) (+ (* (sin phi1) (sin phi2)) (* (pow lambda1 2) (+ (* -1/2 (* (cos phi1) (cos phi2))) (* (pow lambda1 2) (+ (* -1/720 (* (pow lambda1 2) (* (cos phi1) (cos phi2)))) (* 1/24 (* (cos phi1) (cos phi2)))))))))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(* 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))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* 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))))))))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))
(* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))
(* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))
(* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))
(* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))
(* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))
(* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))
(* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))
(* -1 (* R (+ (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (* -1/2 (PI)))))
(* -1 (* R (+ (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (* -1/2 (PI)))))
(* -1 (* R (+ (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (* -1/2 (PI)))))
(* -1 (* R (+ (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (* -1/2 (PI)))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(+ (* (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 lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (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)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (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))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin 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 lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(* 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 lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* 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 lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* 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 lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* 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 lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* 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 lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* 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 lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* 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 lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* 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 lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* 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 lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* 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 lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* 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 lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* 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 lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* 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 lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* 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 lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* 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 lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* 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 lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* 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 lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* 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 lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* 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 lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* 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 lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* 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 lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* 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 lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* 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 lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* 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 lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* 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 lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* 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 lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* 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 lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* 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 lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* 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 lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(* 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 lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (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 lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (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 lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (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 lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (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 lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (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 lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (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 lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (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 lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (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 lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (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 lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (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 lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (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 lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (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 lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (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 lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (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 lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (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 lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (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 lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (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 lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (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 lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (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 lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (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 lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (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 lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (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 lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (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 lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (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 lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(* (cos lambda1) (* (cos lambda2) (cos phi2)))
(+ (* phi1 (sin phi2)) (* (cos lambda1) (* (cos lambda2) (cos phi2))))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos lambda1) (* (cos lambda2) (cos phi2))))))) (* (cos lambda1) (* (cos lambda2) (cos phi2))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos lambda1) (* (cos lambda2) (cos phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))
(* (cos lambda1) (* (cos lambda2) (cos phi1)))
(+ (* phi2 (sin phi1)) (* (cos lambda1) (* (cos lambda2) (cos phi1))))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos lambda1) (* (cos lambda2) (cos phi1))))))) (* (cos lambda1) (* (cos lambda2) (cos phi1))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos lambda1) (* (cos lambda2) (cos phi1))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* -1/2 (* (pow lambda1 2) (* (cos lambda2) (* (cos phi1) (cos phi2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (+ (* (sin phi1) (sin phi2)) (* (pow lambda1 2) (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* 1/24 (* (pow lambda1 2) (* (cos lambda2) (* (cos phi1) (cos phi2)))))))))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (+ (* (sin phi1) (sin phi2)) (* (pow lambda1 2) (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (pow lambda1 2) (+ (* -1/720 (* (pow lambda1 2) (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* 1/24 (* (cos lambda2) (* (cos phi1) (cos phi2))))))))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+ (* -1/2 (* (pow lambda2 2) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (+ (* (sin phi1) (sin phi2)) (* (pow lambda2 2) (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* 1/24 (* (pow lambda2 2) (* (cos lambda1) (* (cos phi1) (cos phi2)))))))))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (+ (* (sin phi1) (sin phi2)) (* (pow lambda2 2) (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* 1/24 (* (cos lambda1) (* (cos phi1) (cos phi2))))))))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin 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))))))))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin 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))))))))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos 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 phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos lambda2) (* (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 phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(cos (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 (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos lambda2)
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(+ (cos lambda2) (* lambda1 (- (* -1/2 (* lambda1 (cos lambda2))) (* -1 (sin lambda2)))))
(+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))) (* -1 (sin lambda2)))))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (+ lambda2 (* -1 lambda1)))
(cos (+ lambda2 (* -1 lambda1)))
(cos (+ lambda2 (* -1 lambda1)))
(cos (+ lambda2 (* -1 lambda1)))
(* (cos lambda1) (cos phi2))
(+ (* -1/2 (* (pow phi1 2) (* (cos lambda1) (cos phi2)))) (* (cos lambda1) (cos phi2)))
(+ (* (cos lambda1) (cos phi2)) (* (pow phi1 2) (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* 1/24 (* (pow phi1 2) (* (cos lambda1) (cos phi2)))))))
(+ (* (cos lambda1) (cos phi2)) (* (pow phi1 2) (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (cos lambda1) (cos phi2)))) (* 1/24 (* (cos lambda1) (cos phi2))))))))
(* (cos lambda1) (* (cos phi1) (cos phi2)))
(* (cos lambda1) (* (cos phi1) (cos phi2)))
(* (cos lambda1) (* (cos phi1) (cos phi2)))
(* (cos lambda1) (* (cos phi1) (cos phi2)))
(* (cos lambda1) (* (cos phi1) (cos phi2)))
(* (cos lambda1) (* (cos phi1) (cos phi2)))
(* (cos lambda1) (* (cos phi1) (cos phi2)))
(* (cos lambda1) (* (cos phi1) (cos phi2)))
(* (cos lambda1) (cos phi1))
(+ (* -1/2 (* (pow phi2 2) (* (cos lambda1) (cos phi1)))) (* (cos lambda1) (cos phi1)))
(+ (* (cos lambda1) (cos phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda1) (cos phi1))) (* 1/24 (* (pow phi2 2) (* (cos lambda1) (cos phi1)))))))
(+ (* (cos lambda1) (cos phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda1) (cos phi1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos lambda1) (cos phi1)))) (* 1/24 (* (cos lambda1) (cos phi1))))))))
(* (cos lambda1) (* (cos phi1) (cos phi2)))
(* (cos lambda1) (* (cos phi1) (cos phi2)))
(* (cos lambda1) (* (cos phi1) (cos phi2)))
(* (cos lambda1) (* (cos phi1) (cos phi2)))
(* (cos lambda1) (* (cos phi1) (cos phi2)))
(* (cos lambda1) (* (cos phi1) (cos phi2)))
(* (cos lambda1) (* (cos phi1) (cos phi2)))
(* (cos lambda1) (* (cos phi1) (cos phi2)))
(* (cos phi1) (cos phi2))
(+ (* -1/2 (* (pow lambda1 2) (* (cos phi1) (cos phi2)))) (* (cos phi1) (cos phi2)))
(+ (* (cos phi1) (cos phi2)) (* (pow lambda1 2) (+ (* -1/2 (* (cos phi1) (cos phi2))) (* 1/24 (* (pow lambda1 2) (* (cos phi1) (cos phi2)))))))
(+ (* (cos phi1) (cos phi2)) (* (pow lambda1 2) (+ (* -1/2 (* (cos phi1) (cos phi2))) (* (pow lambda1 2) (+ (* -1/720 (* (pow lambda1 2) (* (cos phi1) (cos phi2)))) (* 1/24 (* (cos phi1) (cos phi2))))))))
(* (cos lambda1) (* (cos phi1) (cos phi2)))
(* (cos lambda1) (* (cos phi1) (cos phi2)))
(* (cos lambda1) (* (cos phi1) (cos phi2)))
(* (cos lambda1) (* (cos phi1) (cos phi2)))
(* (cos lambda1) (* (cos phi1) (cos phi2)))
(* (cos lambda1) (* (cos phi1) (cos phi2)))
(* (cos lambda1) (* (cos phi1) (cos phi2)))
(* (cos lambda1) (* (cos phi1) (cos phi2)))
(cos (neg lambda2))
(+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))
(+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))
(+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin 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))))))))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* 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))))))))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
Outputs
(cos lambda1)
(cos.f64 lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))
(+ (cos lambda1) (* lambda2 (+ (sin lambda1) (* -1/2 (* lambda2 (cos lambda1))))))
(+.f64 (cos.f64 lambda1) (*.f64 lambda2 (+.f64 (sin.f64 lambda1) (*.f64 lambda2 (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64))))))
(+ (cos lambda1) (* lambda2 (+ (sin lambda1) (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))))))
(+.f64 (cos.f64 lambda1) (*.f64 lambda2 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (sin.f64 lambda1) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda2 lambda2)) #s(literal 1 binary64))))))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(cos lambda2)
(cos.f64 lambda2)
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))
(+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))
(+.f64 (cos.f64 lambda2) (*.f64 lambda1 (+.f64 (sin.f64 lambda2) (*.f64 lambda1 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))))))
(+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))))))
(+.f64 (cos.f64 lambda2) (*.f64 lambda1 (+.f64 (*.f64 lambda1 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))) (*.f64 (sin.f64 lambda2) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda1 lambda1)) #s(literal 1 binary64))))))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))
(+ (* phi1 (sin phi2)) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (*.f64 phi1 (sin.f64 phi2)))
(+ (* 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)))))
(+.f64 (*.f64 phi1 (sin.f64 phi2)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))) (*.f64 (+.f64 (*.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)))))
(+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (*.f64 phi1 (+.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (cos.f64 phi2)) (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1)) #s(literal 1 binary64)) (sin.f64 phi2)))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(*.f64 (+.f64 (*.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)))))
(+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 phi2 (sin.f64 phi1)))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+.f64 (*.f64 phi2 (sin.f64 phi1)) (*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2)) #s(literal 1 binary64)) (*.f64 (+.f64 (*.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)))))
(+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 phi2 (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) phi2)) (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 phi2 phi2)) #s(literal 1 binary64)) (sin.f64 phi1)))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))
(+ (* 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))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (+.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda2 lambda2)) #s(literal 1 binary64)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (*.f64 lambda2 (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))) (* (sin phi1) (sin phi2))))
(+.f64 (*.f64 lambda2 (*.f64 lambda2 (*.f64 (cos.f64 phi1) (+.f64 (*.f64 (cos.f64 lambda1) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (*.f64 (*.f64 lambda2 #s(literal -1/6 binary64)) (*.f64 (sin.f64 lambda1) (cos.f64 phi2))))))) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))))
(+ (* 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))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (+.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1)) #s(literal 1 binary64)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 lambda1 (sin.f64 lambda2)))))
(+ (* 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))))
(+.f64 (*.f64 (*.f64 (cos.f64 phi1) (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (cos.f64 phi2)) (*.f64 (*.f64 lambda1 #s(literal -1/6 binary64)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2))))) (*.f64 lambda1 lambda1)) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))
(*.f64 R (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))
(*.f64 R (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))
(*.f64 R (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))
(*.f64 R (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))
(*.f64 R (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))
(*.f64 R (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))
(*.f64 R (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))
(*.f64 R (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))
(*.f64 R (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))
(*.f64 R (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))
(*.f64 R (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))
(*.f64 R (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))
(*.f64 R (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))
(*.f64 R (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))
(*.f64 R (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))
(*.f64 R (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))
(*.f64 R (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))
(*.f64 R (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))
(*.f64 R (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))
(*.f64 R (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(* R (acos (* (cos phi1) (cos (neg (+ lambda1 (* -1 lambda2)))))))
(*.f64 R (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(* R (acos (* (cos phi1) (cos (neg (+ lambda1 (* -1 lambda2)))))))
(*.f64 R (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(* R (acos (* (cos phi1) (cos (neg (+ lambda1 (* -1 lambda2)))))))
(*.f64 R (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(* R (acos (* (cos phi1) (cos (neg (+ lambda1 (* -1 lambda2)))))))
(*.f64 R (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))
(*.f64 R (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))
(*.f64 R (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))
(*.f64 R (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))
(*.f64 R (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))
(*.f64 R (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))
(*.f64 R (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))
(*.f64 R (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))
(*.f64 R (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(* R (acos (* (cos phi1) (cos (+ lambda2 (* -1 lambda1))))))
(*.f64 R (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(* R (acos (* (cos phi1) (cos (+ lambda2 (* -1 lambda1))))))
(*.f64 R (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(* R (acos (* (cos phi1) (cos (+ lambda2 (* -1 lambda1))))))
(*.f64 R (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(* R (acos (* (cos phi1) (cos (+ lambda2 (* -1 lambda1))))))
(*.f64 R (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))
(*.f64 R (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))
(*.f64 R (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))
(*.f64 R (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))
(*.f64 R (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))
(*.f64 R (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))
(*.f64 R (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))
(*.f64 R (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))
(*.f64 R (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))
(*.f64 R (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))
(*.f64 R (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))
(*.f64 R (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))
(*.f64 R (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
(acos (* (cos phi1) (cos (- lambda2 lambda1))))
(acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(acos (* (cos phi1) (cos (- lambda2 lambda1))))
(acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(acos (* (cos phi1) (cos (- lambda2 lambda1))))
(acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(acos (* (cos phi1) (cos (- lambda2 lambda1))))
(acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(acos (* (cos phi1) (cos (- lambda2 lambda1))))
(acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(acos (* (cos phi1) (cos (- lambda2 lambda1))))
(acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(acos (* (cos phi1) (cos (- lambda2 lambda1))))
(acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(acos (* (cos phi1) (cos (- lambda2 lambda1))))
(acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(acos (* (cos phi1) (cos (- lambda2 lambda1))))
(acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(acos (* (cos phi1) (cos (- lambda2 lambda1))))
(acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(acos (* (cos phi1) (cos (- lambda2 lambda1))))
(acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(acos (* (cos phi1) (cos (- lambda2 lambda1))))
(acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(acos (* (cos phi1) (cos (- lambda2 lambda1))))
(acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(acos (* (cos phi1) (cos (- lambda2 lambda1))))
(acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(acos (* (cos phi1) (cos (- lambda2 lambda1))))
(acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(acos (* (cos phi1) (cos (- lambda2 lambda1))))
(acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(acos (* (cos phi1) (cos (- lambda2 lambda1))))
(acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(acos (* (cos phi1) (cos (- lambda2 lambda1))))
(acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(acos (* (cos phi1) (cos (- lambda2 lambda1))))
(acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(acos (* (cos phi1) (cos (- lambda2 lambda1))))
(acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(acos (* (cos phi1) (cos (neg (+ lambda1 (* -1 lambda2))))))
(acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(acos (* (cos phi1) (cos (neg (+ lambda1 (* -1 lambda2))))))
(acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(acos (* (cos phi1) (cos (neg (+ lambda1 (* -1 lambda2))))))
(acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(acos (* (cos phi1) (cos (neg (+ lambda1 (* -1 lambda2))))))
(acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(acos (* (cos phi1) (cos (- lambda2 lambda1))))
(acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(acos (* (cos phi1) (cos (- lambda2 lambda1))))
(acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(acos (* (cos phi1) (cos (- lambda2 lambda1))))
(acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(acos (* (cos phi1) (cos (- lambda2 lambda1))))
(acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(acos (* (cos phi1) (cos (- lambda2 lambda1))))
(acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(acos (* (cos phi1) (cos (- lambda2 lambda1))))
(acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(acos (* (cos phi1) (cos (- lambda2 lambda1))))
(acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(acos (* (cos phi1) (cos (- lambda2 lambda1))))
(acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(acos (* (cos phi1) (cos (+ lambda2 (* -1 lambda1)))))
(acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(acos (* (cos phi1) (cos (+ lambda2 (* -1 lambda1)))))
(acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(acos (* (cos phi1) (cos (+ lambda2 (* -1 lambda1)))))
(acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(acos (* (cos phi1) (cos (+ lambda2 (* -1 lambda1)))))
(acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(+ (cos (- lambda2 lambda1)) (* -1/2 (* (pow phi1 2) (cos (- lambda2 lambda1)))))
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))) (cos.f64 (-.f64 lambda1 lambda2)))
(+ (cos (- lambda2 lambda1)) (* (pow phi1 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* 1/24 (* (pow phi1 2) (cos (- lambda2 lambda1)))))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))) (*.f64 (*.f64 phi1 phi1) (*.f64 phi1 (*.f64 phi1 #s(literal 1/24 binary64))))))
(+ (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))))))))
(+.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64)))) (*.f64 (*.f64 phi1 phi1) (*.f64 phi1 phi1))))
(* (cos phi1) (cos (- lambda2 lambda1)))
(*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))
(* (cos phi1) (cos (- lambda2 lambda1)))
(*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))
(* (cos phi1) (cos (- lambda2 lambda1)))
(*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))
(* (cos phi1) (cos (- lambda2 lambda1)))
(*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))
(* (cos phi1) (cos (- lambda2 lambda1)))
(*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))
(* (cos phi1) (cos (- lambda2 lambda1)))
(*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))
(* (cos phi1) (cos (- lambda2 lambda1)))
(*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))
(* (cos phi1) (cos (- lambda2 lambda1)))
(*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))
(* (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 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))
(+ (* lambda2 (+ (* -1 (* (cos phi1) (sin (neg lambda1)))) (* -1/2 (* lambda2 (* (cos phi1) (cos (neg lambda1))))))) (* (cos phi1) (cos (neg lambda1))))
(+.f64 (*.f64 lambda2 (*.f64 (cos.f64 phi1) (+.f64 (sin.f64 lambda1) (*.f64 lambda2 (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64)))))) (*.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))))
(+.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))) (*.f64 (*.f64 (cos.f64 phi1) (-.f64 (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64)) (*.f64 (*.f64 lambda2 #s(literal 1/6 binary64)) (sin.f64 lambda1)))) (*.f64 lambda2 lambda2)))
(* (cos phi1) (cos (- lambda2 lambda1)))
(*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))
(* (cos phi1) (cos (- lambda2 lambda1)))
(*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))
(* (cos phi1) (cos (- lambda2 lambda1)))
(*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))
(* (cos phi1) (cos (- lambda2 lambda1)))
(*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))
(* (cos phi1) (cos (neg (+ lambda1 (* -1 lambda2)))))
(*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))
(* (cos phi1) (cos (neg (+ lambda1 (* -1 lambda2)))))
(*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))
(* (cos phi1) (cos (neg (+ lambda1 (* -1 lambda2)))))
(*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))
(* (cos phi1) (cos (neg (+ lambda1 (* -1 lambda2)))))
(*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))
(* (cos lambda2) (cos phi1))
(*.f64 (cos.f64 lambda2) (cos.f64 phi1))
(+ (* lambda1 (* (cos phi1) (sin lambda2))) (* (cos lambda2) (cos phi1)))
(*.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi1)))) (* (cos phi1) (sin lambda2)))) (* (cos lambda2) (cos phi1)))
(+.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 lambda1 (*.f64 (cos.f64 phi1) (+.f64 (sin.f64 lambda2) (*.f64 lambda1 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)))))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (cos phi1))) (* -1/6 (* lambda1 (* (cos phi1) (sin lambda2)))))) (* (cos phi1) (sin lambda2)))) (* (cos lambda2) (cos phi1)))
(+.f64 (*.f64 (*.f64 (cos.f64 phi1) (+.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (*.f64 #s(literal -1/6 binary64) (*.f64 lambda1 (sin.f64 lambda2))))) (*.f64 lambda1 lambda1)) (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))))
(* (cos phi1) (cos (- lambda2 lambda1)))
(*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))
(* (cos phi1) (cos (- lambda2 lambda1)))
(*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))
(* (cos phi1) (cos (- lambda2 lambda1)))
(*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))
(* (cos phi1) (cos (- lambda2 lambda1)))
(*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))
(* (cos phi1) (cos (+ lambda2 (* -1 lambda1))))
(*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))
(* (cos phi1) (cos (+ lambda2 (* -1 lambda1))))
(*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))
(* (cos phi1) (cos (+ lambda2 (* -1 lambda1))))
(*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))
(* (cos phi1) (cos (+ lambda2 (* -1 lambda1))))
(*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))
1
#s(literal 1 binary64)
(+ 1 (* -1/2 (pow phi1 2)))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1)))
(+ 1 (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2)))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1/2 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal 1/24 binary64))))))
(+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2)))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1/2 binary64) (*.f64 phi1 (*.f64 phi1 (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64))))))))
(cos phi1)
(cos.f64 phi1)
(cos phi1)
(cos.f64 phi1)
(cos phi1)
(cos.f64 phi1)
(cos phi1)
(cos.f64 phi1)
(cos phi1)
(cos.f64 phi1)
(cos phi1)
(cos.f64 phi1)
(cos phi1)
(cos.f64 phi1)
(cos phi1)
(cos.f64 phi1)
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(* (cos lambda1) (cos phi2))
(*.f64 (cos.f64 lambda1) (cos.f64 phi2))
(+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2)))
(+.f64 (*.f64 phi1 (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos lambda1) (cos phi2)))))) (* (cos lambda1) (cos phi2)))
(+.f64 (*.f64 phi1 (sin.f64 phi2)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos lambda1) (cos phi2)))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (*.f64 phi1 (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64)) (*.f64 phi1 (cos.f64 phi2))) (*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1)) #s(literal 1 binary64)) (sin.f64 phi2)))))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(* (cos lambda1) (cos phi1))
(*.f64 (cos.f64 lambda1) (cos.f64 phi1))
(+ (* phi2 (sin phi1)) (* (cos lambda1) (cos phi1)))
(+.f64 (*.f64 phi2 (sin.f64 phi1)) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos lambda1) (cos phi1)))))) (* (cos lambda1) (cos phi1)))
(+.f64 (*.f64 phi2 (sin.f64 phi1)) (*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2)) #s(literal 1 binary64)) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos lambda1) (cos phi1))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos lambda1) (cos phi1)))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi1)) (*.f64 phi2 (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64)) (*.f64 (cos.f64 phi1) phi2)) (*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 phi2 phi2)) #s(literal 1 binary64)) (sin.f64 phi1)))))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(+ (* -1/2 (* (pow lambda1 2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos phi1) (cos phi2)) (+ (* (sin phi1) (sin phi2)) (* (pow lambda1 2) (+ (* -1/2 (* (cos phi1) (cos phi2))) (* 1/24 (* (pow lambda1 2) (* (cos phi1) (cos phi2))))))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1)) #s(literal 1 binary64)) (*.f64 (*.f64 lambda1 lambda1) (*.f64 #s(literal 1/24 binary64) (*.f64 lambda1 lambda1))))))
(+ (* (cos phi1) (cos phi2)) (+ (* (sin phi1) (sin phi2)) (* (pow lambda1 2) (+ (* -1/2 (* (cos phi1) (cos phi2))) (* (pow lambda1 2) (+ (* -1/720 (* (pow lambda1 2) (* (cos phi1) (cos phi2)))) (* 1/24 (* (cos phi1) (cos phi2)))))))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (+.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 lambda1 lambda1)) #s(literal 1/24 binary64))) (*.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1)))))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(* phi1 (sin phi2))
(*.f64 phi1 (sin.f64 phi2))
(* phi1 (+ (sin phi2) (* -1/6 (* (pow phi1 2) (sin phi2)))))
(*.f64 phi1 (*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1)) #s(literal 1 binary64)) (sin.f64 phi2)))
(* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* 1/120 (* (pow phi1 2) (sin phi2)))))))
(*.f64 phi1 (*.f64 (sin.f64 phi2) (+.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1)) #s(literal 1 binary64)) (*.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 phi1 phi1) #s(literal 1/120 binary64))))))
(* 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 phi1 (+.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1)) #s(literal 1 binary64)) (sin.f64 phi2)) (*.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (sin.f64 phi2) (*.f64 phi1 phi1)) (+.f64 (*.f64 (*.f64 phi1 phi1) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64))))))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(* phi2 (sin phi1))
(*.f64 phi2 (sin.f64 phi1))
(* phi2 (+ (sin phi1) (* -1/6 (* (pow phi2 2) (sin phi1)))))
(*.f64 phi2 (*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 phi2 phi2)) #s(literal 1 binary64)) (sin.f64 phi1)))
(* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* 1/120 (* (pow phi2 2) (sin phi1)))))))
(*.f64 phi2 (*.f64 (sin.f64 phi1) (+.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 phi2 phi2)) #s(literal 1 binary64)) (*.f64 (*.f64 phi2 phi2) (*.f64 #s(literal 1/120 binary64) (*.f64 phi2 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 phi2 (+.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 phi2 phi2)) #s(literal 1 binary64)) (sin.f64 phi1)) (*.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 phi2 (*.f64 phi2 (sin.f64 phi1))) (+.f64 (*.f64 #s(literal -1/5040 binary64) (*.f64 phi2 phi2)) #s(literal 1/120 binary64))))))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(* -1 (* R (+ (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (* -1/2 (PI)))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(* -1 (* R (+ (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (* -1/2 (PI)))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(* -1 (* R (+ (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (* -1/2 (PI)))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(* -1 (* R (+ (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (* -1/2 (PI)))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 0 binary64) R))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 0 binary64) R))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 0 binary64) R))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 0 binary64) R))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 0 binary64) R))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 0 binary64) R))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 0 binary64) R))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 0 binary64) R))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 0 binary64) R))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 0 binary64) R))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 0 binary64) R))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 0 binary64) R))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 0 binary64) R))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 0 binary64) R))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 0 binary64) R))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 0 binary64) R))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 0 binary64) R))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 0 binary64) R))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 0 binary64) R))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 0 binary64) R))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 0 binary64) R))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 0 binary64) R))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 0 binary64) R))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 0 binary64) R))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 0 binary64) R))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 0 binary64) R))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 0 binary64) R))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 0 binary64) R))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 0 binary64) R))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 0 binary64) R))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 0 binary64) R))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 0 binary64) R))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))))
(*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 0 binary64) R))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))))
(*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 0 binary64) R))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))))
(*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 0 binary64) R))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))))
(*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 0 binary64) R))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 0 binary64) R))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 0 binary64) R))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 0 binary64) R))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 0 binary64) R))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 0 binary64) R))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 0 binary64) R))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 0 binary64) R))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 0 binary64) R))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))))
(*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 0 binary64) R))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))))
(*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 0 binary64) R))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))))
(*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 0 binary64) R))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))))
(*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 0 binary64) R))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 0 binary64) R))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 0 binary64) R))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 0 binary64) R))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 0 binary64) R))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 0 binary64) R))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 0 binary64) R))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 0 binary64) R))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 0 binary64) R))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 0 binary64) R))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 0 binary64) R))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 0 binary64) R))
(* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 0 binary64) R))
(+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2))))
(*.f64 (+.f64 (*.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)))))
(+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (*.f64 phi1 (sin.f64 phi2)))
(+ (* 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)))))
(+.f64 (*.f64 phi1 (sin.f64 phi2)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))) (*.f64 (+.f64 (*.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)))))
(+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (*.f64 phi1 (+.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (cos.f64 phi2)) (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1)) #s(literal 1 binary64)) (sin.f64 phi2)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2))))
(*.f64 (+.f64 (*.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)))))
(+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 phi2 (sin.f64 phi1)))
(+ (* phi2 (+ (sin phi1) (* 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)))))
(+.f64 (*.f64 phi2 (sin.f64 phi1)) (*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2)) #s(literal 1 binary64)) (*.f64 (+.f64 (*.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)))))
(+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 phi2 (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) phi2)) (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 phi2 phi2)) #s(literal 1 binary64)) (sin.f64 phi1)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))))
(+ (* 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))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (+.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1)) #s(literal 1 binary64)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 lambda1 (sin.f64 lambda2)))))
(+ (* 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))))
(+.f64 (*.f64 (*.f64 (cos.f64 phi1) (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (cos.f64 phi2)) (*.f64 (*.f64 lambda1 #s(literal -1/6 binary64)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2))))) (*.f64 lambda1 lambda1)) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))
(+ (* 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))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (+.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda2 lambda2)) #s(literal 1 binary64)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (*.f64 lambda2 (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))) (* (sin phi1) (sin phi2))))
(+.f64 (*.f64 lambda2 (*.f64 lambda2 (*.f64 (cos.f64 phi1) (+.f64 (*.f64 (cos.f64 lambda1) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (*.f64 (*.f64 lambda2 #s(literal -1/6 binary64)) (*.f64 (sin.f64 lambda1) (cos.f64 phi2))))))) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(* (cos lambda1) (* (cos lambda2) (cos phi2)))
(*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))
(+ (* phi1 (sin phi2)) (* (cos lambda1) (* (cos lambda2) (cos phi2))))
(+.f64 (*.f64 phi1 (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos lambda1) (* (cos lambda2) (cos phi2))))))) (* (cos lambda1) (* (cos lambda2) (cos phi2))))
(+.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) (*.f64 phi1 (+.f64 (sin.f64 phi2) (*.f64 (*.f64 phi1 (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos lambda1) (* (cos lambda2) (cos phi2))))
(+.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) (*.f64 phi1 (+.f64 (*.f64 (*.f64 phi1 (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) (*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1)) #s(literal 1 binary64)) (sin.f64 phi2)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(* (cos lambda1) (* (cos lambda2) (cos phi1)))
(*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)))
(+ (* phi2 (sin phi1)) (* (cos lambda1) (* (cos lambda2) (cos phi1))))
(+.f64 (*.f64 phi2 (sin.f64 phi1)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi1))))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos lambda1) (* (cos lambda2) (cos phi1))))))) (* (cos lambda1) (* (cos lambda2) (cos phi1))))
(+.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi1))) (*.f64 phi2 (+.f64 (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 lambda1) phi2) (*.f64 (cos.f64 lambda2) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos lambda1) (* (cos lambda2) (cos phi1))))
(+.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi1))) (*.f64 phi2 (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) phi2) (*.f64 (cos.f64 lambda2) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))) (*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 phi2 phi2)) #s(literal 1 binary64)) (sin.f64 phi1)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* -1/2 (* (pow lambda1 2) (* (cos lambda2) (* (cos phi1) (cos phi2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1)) #s(literal 1 binary64)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (+ (* (sin phi1) (sin phi2)) (* (pow lambda1 2) (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* 1/24 (* (pow lambda1 2) (* (cos lambda2) (* (cos phi1) (cos phi2)))))))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (+.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (*.f64 lambda1 lambda1) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (+.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/24 binary64) (*.f64 lambda1 lambda1)))))))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (+ (* (sin phi1) (sin phi2)) (* (pow lambda1 2) (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (pow lambda1 2) (+ (* -1/720 (* (pow lambda1 2) (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* 1/24 (* (cos lambda2) (* (cos phi1) (cos phi2))))))))))
(+.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1)) #s(literal 1 binary64)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) (*.f64 (*.f64 lambda1 lambda1) (*.f64 (*.f64 lambda1 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 lambda1 lambda1)) #s(literal 1/24 binary64)))))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* -1/2 (* (pow lambda2 2) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda2 lambda2)) #s(literal 1 binary64)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (+ (* (sin phi1) (sin phi2)) (* (pow lambda2 2) (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* 1/24 (* (pow lambda2 2) (* (cos lambda1) (* (cos phi1) (cos phi2)))))))))
(+.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (*.f64 lambda2 lambda2) (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (+.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/24 binary64) (*.f64 lambda2 lambda2))))))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (+ (* (sin phi1) (sin phi2)) (* (pow lambda2 2) (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* 1/24 (* (cos lambda1) (* (cos phi1) (cos phi2))))))))))
(+.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda2 lambda2)) #s(literal 1 binary64)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (+.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 lambda2 lambda2)) #s(literal 1/24 binary64))) (*.f64 (*.f64 lambda2 lambda2) (*.f64 lambda2 lambda2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))
(+ (* -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 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (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)))))))))
(*.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))) (*.f64 (*.f64 phi1 phi1) (*.f64 phi1 (*.f64 phi1 #s(literal 1/24 binary64))))))
(+ (* (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))))))))))
(+.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))) (*.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (*.f64 phi1 (*.f64 phi1 (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64))))))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1))
(+ (* -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 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2)) #s(literal 1 binary64)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (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)))))))))
(*.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (+.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2)) #s(literal 1 binary64)) (*.f64 (*.f64 phi2 phi2) (*.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)))))
(+ (* (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))))))))))
(+.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2)) #s(literal 1 binary64)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1))) (*.f64 (*.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (+.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 phi2 phi2)) #s(literal 1/24 binary64))) (*.f64 (*.f64 phi2 phi2) (*.f64 phi2 phi2))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos lambda1) (* (cos phi1) (cos phi2)))
(*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(+.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda2 lambda2)) #s(literal 1 binary64)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (*.f64 lambda2 (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))))
(+.f64 (*.f64 lambda2 (*.f64 lambda2 (*.f64 (cos.f64 phi1) (+.f64 (*.f64 (cos.f64 lambda1) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2))) (*.f64 (*.f64 lambda2 #s(literal -1/6 binary64)) (*.f64 (sin.f64 lambda1) (cos.f64 phi2))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(+.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1)) #s(literal 1 binary64)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 lambda1 (sin.f64 lambda2))))
(+ (* 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))))
(+.f64 (*.f64 (*.f64 (cos.f64 phi1) (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (cos.f64 phi2)) (*.f64 (*.f64 lambda1 #s(literal -1/6 binary64)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2))))) (*.f64 lambda1 lambda1)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(cos (neg lambda1))
(cos.f64 lambda1)
(+ (cos (neg lambda1)) (* -1 (* lambda2 (sin (neg lambda1)))))
(+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))
(+ (cos (neg lambda1)) (* lambda2 (- (* -1/2 (* lambda2 (cos (neg lambda1)))) (sin (neg lambda1)))))
(+.f64 (cos.f64 lambda1) (*.f64 lambda2 (+.f64 (sin.f64 lambda1) (*.f64 lambda2 (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64))))))
(+ (cos (neg lambda1)) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (neg lambda1))) (* 1/6 (* lambda2 (sin (neg lambda1)))))) (sin (neg lambda1)))))
(+.f64 (cos.f64 lambda1) (*.f64 lambda2 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (sin.f64 lambda1)) (+.f64 (*.f64 lambda2 (*.f64 lambda2 #s(literal 1/6 binary64))) #s(literal -1 binary64))))))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos lambda2)
(cos.f64 lambda2)
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))
(+ (cos lambda2) (* lambda1 (- (* -1/2 (* lambda1 (cos lambda2))) (* -1 (sin lambda2)))))
(+.f64 (cos.f64 lambda2) (*.f64 lambda1 (+.f64 (sin.f64 lambda2) (*.f64 lambda1 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))))))
(+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))) (* -1 (sin lambda2)))))
(+.f64 (cos.f64 lambda2) (*.f64 lambda1 (+.f64 (*.f64 lambda1 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))) (*.f64 (sin.f64 lambda2) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda1 lambda1)) #s(literal 1 binary64))))))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda2 (* -1 lambda1)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda2 (* -1 lambda1)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda2 (* -1 lambda1)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda2 (* -1 lambda1)))
(cos.f64 (-.f64 lambda1 lambda2))
(* (cos lambda1) (cos phi2))
(*.f64 (cos.f64 lambda1) (cos.f64 phi2))
(+ (* -1/2 (* (pow phi1 2) (* (cos lambda1) (cos phi2)))) (* (cos lambda1) (cos phi2)))
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))
(+ (* (cos lambda1) (cos phi2)) (* (pow phi1 2) (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* 1/24 (* (pow phi1 2) (* (cos lambda1) (cos phi2)))))))
(*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))) (*.f64 (*.f64 phi1 phi1) (*.f64 phi1 (*.f64 phi1 #s(literal 1/24 binary64))))))
(+ (* (cos lambda1) (cos phi2)) (* (pow phi1 2) (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (cos lambda1) (cos phi2)))) (* 1/24 (* (cos lambda1) (cos phi2))))))))
(+.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) (*.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 phi1 (*.f64 phi1 (cos.f64 phi2)))) (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64))))))
(* (cos lambda1) (* (cos phi1) (cos phi2)))
(*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos lambda1) (* (cos phi1) (cos phi2)))
(*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos lambda1) (* (cos phi1) (cos phi2)))
(*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos lambda1) (* (cos phi1) (cos phi2)))
(*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos lambda1) (* (cos phi1) (cos phi2)))
(*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos lambda1) (* (cos phi1) (cos phi2)))
(*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos lambda1) (* (cos phi1) (cos phi2)))
(*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos lambda1) (* (cos phi1) (cos phi2)))
(*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos lambda1) (cos phi1))
(*.f64 (cos.f64 lambda1) (cos.f64 phi1))
(+ (* -1/2 (* (pow phi2 2) (* (cos lambda1) (cos phi1)))) (* (cos lambda1) (cos phi1)))
(*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2)) #s(literal 1 binary64)) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))
(+ (* (cos lambda1) (cos phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda1) (cos phi1))) (* 1/24 (* (pow phi2 2) (* (cos lambda1) (cos phi1)))))))
(*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi1)) (+.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2)) #s(literal 1 binary64)) (*.f64 (*.f64 phi2 phi2) (*.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2)))))
(+ (* (cos lambda1) (cos phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda1) (cos phi1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos lambda1) (cos phi1)))) (* 1/24 (* (cos lambda1) (cos phi1))))))))
(+.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2)) #s(literal 1 binary64)) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi1)) (+.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 phi2 phi2)) #s(literal 1/24 binary64))) (*.f64 (*.f64 phi2 phi2) (*.f64 phi2 phi2))))
(* (cos lambda1) (* (cos phi1) (cos phi2)))
(*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos lambda1) (* (cos phi1) (cos phi2)))
(*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos lambda1) (* (cos phi1) (cos phi2)))
(*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos lambda1) (* (cos phi1) (cos phi2)))
(*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos lambda1) (* (cos phi1) (cos phi2)))
(*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos lambda1) (* (cos phi1) (cos phi2)))
(*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos lambda1) (* (cos phi1) (cos phi2)))
(*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos lambda1) (* (cos phi1) (cos phi2)))
(*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (cos phi2))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(+ (* -1/2 (* (pow lambda1 2) (* (cos phi1) (cos phi2)))) (* (cos phi1) (cos phi2)))
(*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(+ (* (cos phi1) (cos phi2)) (* (pow lambda1 2) (+ (* -1/2 (* (cos phi1) (cos phi2))) (* 1/24 (* (pow lambda1 2) (* (cos phi1) (cos phi2)))))))
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1)) #s(literal 1 binary64)) (*.f64 (*.f64 lambda1 lambda1) (*.f64 #s(literal 1/24 binary64) (*.f64 lambda1 lambda1)))))
(+ (* (cos phi1) (cos phi2)) (* (pow lambda1 2) (+ (* -1/2 (* (cos phi1) (cos phi2))) (* (pow lambda1 2) (+ (* -1/720 (* (pow lambda1 2) (* (cos phi1) (cos phi2)))) (* 1/24 (* (cos phi1) (cos phi2))))))))
(+.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 lambda1 lambda1)) #s(literal 1/24 binary64))) (*.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1))))
(* (cos lambda1) (* (cos phi1) (cos phi2)))
(*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos lambda1) (* (cos phi1) (cos phi2)))
(*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos lambda1) (* (cos phi1) (cos phi2)))
(*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos lambda1) (* (cos phi1) (cos phi2)))
(*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos lambda1) (* (cos phi1) (cos phi2)))
(*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos lambda1) (* (cos phi1) (cos phi2)))
(*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos lambda1) (* (cos phi1) (cos phi2)))
(*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos lambda1) (* (cos phi1) (cos phi2)))
(*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(cos (neg lambda2))
(cos.f64 lambda2)
(+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))
(+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))
(+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))
(+.f64 (cos.f64 lambda2) (*.f64 lambda1 (+.f64 (sin.f64 lambda2) (*.f64 lambda1 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))))))
(+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))
(+.f64 (cos.f64 lambda2) (*.f64 lambda1 (+.f64 (*.f64 lambda1 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))) (*.f64 (-.f64 #s(literal 0 binary64) (sin.f64 lambda2)) (+.f64 (*.f64 lambda1 (*.f64 lambda1 #s(literal 1/6 binary64))) #s(literal -1 binary64))))))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos lambda1)
(cos.f64 lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))
(+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))
(+.f64 (cos.f64 lambda1) (*.f64 lambda2 (+.f64 (sin.f64 lambda1) (*.f64 lambda2 (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64))))))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))
(+.f64 (cos.f64 lambda1) (*.f64 lambda2 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (sin.f64 lambda1) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda2 lambda2)) #s(literal 1 binary64))))))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(* lambda1 (sin lambda2))
(*.f64 lambda1 (sin.f64 lambda2))
(* lambda1 (+ (sin lambda2) (* -1/6 (* (pow lambda1 2) (sin lambda2)))))
(*.f64 lambda1 (*.f64 (sin.f64 lambda2) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda1 lambda1)) #s(literal 1 binary64))))
(* lambda1 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/6 (sin lambda2)) (* 1/120 (* (pow lambda1 2) (sin lambda2)))))))
(*.f64 lambda1 (*.f64 (sin.f64 lambda2) (+.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda1 lambda1)) #s(literal 1 binary64)) (*.f64 (*.f64 lambda1 lambda1) (*.f64 (*.f64 lambda1 lambda1) #s(literal 1/120 binary64))))))
(* 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 lambda1 (+.f64 (*.f64 (sin.f64 lambda2) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda1 lambda1)) #s(literal 1 binary64))) (*.f64 (*.f64 lambda1 lambda1) (*.f64 (*.f64 lambda1 (*.f64 lambda1 (sin.f64 lambda2))) (+.f64 (*.f64 (*.f64 lambda1 lambda1) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64))))))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* lambda2 (sin lambda1))
(*.f64 lambda2 (sin.f64 lambda1))
(* lambda2 (+ (sin lambda1) (* -1/6 (* (pow lambda2 2) (sin lambda1)))))
(*.f64 lambda2 (*.f64 (sin.f64 lambda1) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda2 lambda2)) #s(literal 1 binary64))))
(* lambda2 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/6 (sin lambda1)) (* 1/120 (* (pow lambda2 2) (sin lambda1)))))))
(*.f64 lambda2 (*.f64 (sin.f64 lambda1) (+.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda2 lambda2)) #s(literal 1 binary64)) (*.f64 (*.f64 lambda2 lambda2) (*.f64 #s(literal 1/120 binary64) (*.f64 lambda2 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 lambda2 (+.f64 (*.f64 (sin.f64 lambda1) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda2 lambda2)) #s(literal 1 binary64))) (*.f64 (*.f64 lambda2 lambda2) (*.f64 (*.f64 lambda2 lambda2) (*.f64 (sin.f64 lambda1) (+.f64 (*.f64 #s(literal -1/5040 binary64) (*.f64 lambda2 lambda2)) #s(literal 1/120 binary64)))))))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))

eval335.0ms (1.4%)

Memory
10.9MiB live, 527.7MiB allocated
Compiler

Compiled 70 634 to 4 127 computations (94.2% saved)

prune324.0ms (1.3%)

Memory
1.0MiB live, 574.0MiB allocated
Pruning

88 alts after pruning (87 fresh and 1 done)

PrunedKeptTotal
New2 023712 094
Fresh261642
Picked415
Done000
Total2 053882 141
Accuracy
95.2%
Counts
2 141 → 88
Alt Table
Click to see full alt table
StatusAccuracyProgram
74.3%
(fma.f64 (/.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
75.0%
(fma.f64 (/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64))) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (/.f64 R (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))))
73.9%
(fma.f64 (/.f64 (*.f64 (cbrt.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64))) (cbrt.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)))) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
75.1%
(fma.f64 (/.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64)))) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
75.3%
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64))) R) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64))))
75.1%
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64))) R) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
75.1%
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))) R))
74.9%
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))) R))
75.3%
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) R))
93.7%
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))) R))
93.4%
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))))) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))))) R))
93.6%
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))) R))
45.0%
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (+.f64 (sin.f64 lambda2) (*.f64 lambda1 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))))))))))) R))
49.3%
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))))) R))
93.3%
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))))))) R))
54.1%
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))))) R))
42.4%
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
44.6%
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 phi1 (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
75.0%
(fma.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) R (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))))
75.7%
(/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64))) R) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
75.7%
(+.f64 (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))) (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)))
75.8%
(+.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R) (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
74.6%
(*.f64 (fma.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) R)
55.3%
(*.f64 (fma.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) R)
75.3%
(*.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64))) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal -2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) R)
74.4%
(*.f64 (fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) R)
55.1%
(*.f64 (fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) R)
41.6%
(*.f64 (fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) R)
42.8%
(*.f64 (/.f64 (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #s(literal 2 binary64))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) R)
75.8%
(*.f64 (/.f64 (+.f64 (*.f64 (PI.f64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64))))) (*.f64 #s(literal 2 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)))) R)
56.4%
(*.f64 (-.f64 (/.f64 (/.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal 8 binary64)) (+.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))))) (/.f64 (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64)) (+.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))))) R)
42.8%
(*.f64 (-.f64 (/.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (/.f64 (pow.f64 (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #s(literal 2 binary64)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))) R)
75.8%
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
56.5%
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) R)
42.8%
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) R)
53.5%
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)))) R)
76.0%
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)
75.7%
(*.f64 (acos.f64 (/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
32.9%
(*.f64 (acos.f64 (/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi1)) (cos.f64 (-.f64 (-.f64 lambda1 lambda2) phi1))) #s(literal 2 binary64))) R)
53.3%
(*.f64 (acos.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (cos.f64 phi1)) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R)
42.9%
(*.f64 (acos.f64 (/.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (cos.f64 phi1)) (cos.f64 (+.f64 lambda2 lambda1)))) R)
32.9%
(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (+.f64 (-.f64 phi1 lambda2) lambda1)))))) R)
75.8%
(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) R)
▶60.3%
(*.f64 (acos.f64 (-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
94.1%
(*.f64 (acos.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 3 binary64))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (-.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
94.1%
(*.f64 (acos.f64 (+.f64 (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
86.2%
(*.f64 (acos.f64 (+.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
47.0%
(*.f64 (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 phi2 (sin.f64 phi1)))) R)
35.3%
(*.f64 (acos.f64 (+.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1))) (*.f64 phi1 (sin.f64 phi2))))) R)
39.2%
(*.f64 (acos.f64 (+.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1))) (*.f64 phi1 (sin.f64 phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
56.0%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (-.f64 phi2 lambda1) lambda2))) (cos.f64 phi1)) #s(literal 2 binary64)))) R)
▶94.3%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)
54.2%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))) R)
26.3%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)
▶94.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)
75.5%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (cos.f64 (+.f64 lambda2 lambda1))))))) R)
✓56.6%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)))) R)
54.7%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))) R)
▶34.9%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) R)
31.7%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) R)
32.0%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))) R)
36.8%
(*.f64 (acos.f64 (+.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 phi1 (sin.f64 phi2)))) R)
36.4%
(*.f64 (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 phi2 (sin.f64 phi1)))) R)
34.1%
(*.f64 (acos.f64 (+.f64 (*.f64 phi2 (sin.f64 phi1)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 phi2 (*.f64 phi2 #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
59.0%
(*.f64 (acos.f64 (+.f64 (*.f64 phi2 (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
37.7%
(*.f64 (acos.f64 (+.f64 (*.f64 phi1 (*.f64 (sin.f64 phi2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal 1/120 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
35.2%
(*.f64 (acos.f64 (+.f64 (*.f64 phi1 (sin.f64 phi2)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
45.3%
(*.f64 (acos.f64 (+.f64 (*.f64 phi1 (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
25.9%
(*.f64 (acos.f64 (+.f64 (*.f64 phi1 (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) R)
53.3%
(*.f64 (acos.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))) R)
53.5%
(*.f64 (acos.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1))) R)
17.7%
(*.f64 (acos.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1/2 binary64) (*.f64 phi1 (*.f64 phi1 (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64)))))))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
17.6%
(*.f64 (acos.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1/2 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal 1/24 binary64)))))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
17.5%
(*.f64 (acos.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
43.1%
(*.f64 (acos.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) R)
53.5%
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) R)
53.5%
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) R)
53.4%
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))))) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
23.4%
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (+.f64 (sin.f64 lambda2) (*.f64 lambda1 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)))))))) R)
24.5%
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))) R)
25.0%
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (sin.f64 lambda1)) (+.f64 (*.f64 lambda2 (*.f64 lambda2 #s(literal 1/6 binary64))) #s(literal -1 binary64)))))))) R)
25.0%
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (+.f64 (sin.f64 lambda1) (*.f64 lambda2 (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64)))))))) R)
26.6%
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))) R)
42.9%
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda2 lambda1)))))) R)
31.0%
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 lambda2))) R)
32.2%
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 lambda1))) R)
32.1%
(*.f64 (acos.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) R)
▶24.8%
(*.f64 (acos.f64 (cos.f64 (-.f64 lambda1 lambda2))) R)
Compiler

Compiled 6 088 to 3 826 computations (37.2% saved)

simplify253.0ms (1%)

Memory
-18.3MiB live, 294.5MiB allocated
Algorithm
1×egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
✓cost-diff0
(+.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
(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-diff6272
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
✓cost-diff0
(/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))
✓cost-diff0
(acos.f64 (-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
✓cost-diff0
(*.f64 (acos.f64 (-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
✓cost-diff128
(-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
✓cost-diff0
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
✓cost-diff0
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
✓cost-diff0
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
✓cost-diff0
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) R)
✓cost-diff0
(-.f64 lambda1 lambda2)
✓cost-diff0
(cos.f64 (-.f64 lambda1 lambda2))
✓cost-diff0
(acos.f64 (cos.f64 (-.f64 lambda1 lambda2)))
✓cost-diff0
(*.f64 (acos.f64 (cos.f64 (-.f64 lambda1 lambda2))) R)
✓cost-diff0
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
✓cost-diff0
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
✓cost-diff0
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
✓cost-diff0
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)
Rules
3 856×accelerator-lowering-fma.f32
3 856×accelerator-lowering-fma.f64
1 952×*-lowering-*.f32
1 952×*-lowering-*.f64
624×+-lowering-+.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
049512
191512
2186512
3391512
4679512
51359512
62617512
73422512
83701506
93856506
103949506
113968506
124092506
134140506
144140506
154140506
164140506
174148506
04148484
Stop Event
1×iter limit
1×saturated
Calls
Call 1
Inputs
(* (acos (+ (* (sin phi1) (sin phi2)) (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (* (cos phi1) (cos phi2))))) R)
(acos (+ (* (sin phi1) (sin phi2)) (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (* (cos phi1) (cos phi2)))))
(+ (* (sin phi1) (sin phi2)) (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (* (cos phi1) (cos phi2))))
(* (sin phi1) (sin phi2))
(sin phi1)
phi1
(sin phi2)
phi2
(* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (* (cos phi1) (cos phi2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(* (cos lambda1) (cos lambda2))
(cos lambda1)
lambda1
(cos lambda2)
lambda2
(* (sin lambda1) (sin lambda2))
(sin lambda1)
(sin lambda2)
(* (cos phi1) (cos phi2))
(cos phi1)
(cos phi2)
R
(* (acos (cos (- lambda1 lambda2))) R)
(acos (cos (- lambda1 lambda2)))
(cos (- lambda1 lambda2))
(- lambda1 lambda2)
lambda1
lambda2
R
(* (acos (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (cos phi2)))) R)
(acos (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (cos phi2))))
(+ (* (sin phi1) (sin phi2)) (* (cos phi1) (cos phi2)))
(* (sin phi1) (sin phi2))
(sin phi1)
phi1
(sin phi2)
phi2
(* (cos phi1) (cos phi2))
(cos phi1)
(cos phi2)
R
(* (acos (- (/ (cos (- phi1 phi2)) 2) (- (/ (cos (+ phi1 phi2)) 2) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))) R)
(acos (- (/ (cos (- phi1 phi2)) 2) (- (/ (cos (+ phi1 phi2)) 2) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(- (/ (cos (- phi1 phi2)) 2) (- (/ (cos (+ phi1 phi2)) 2) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(/ (cos (- phi1 phi2)) 2)
(cos (- phi1 phi2))
(- phi1 phi2)
phi1
phi2
2
(- (/ (cos (+ phi1 phi2)) 2) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(/ (cos (+ phi1 phi2)) 2)
(cos (+ phi1 phi2))
(+ phi1 phi2)
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(cos phi1)
(* (cos phi2) (cos (- lambda1 lambda2)))
(cos phi2)
(cos (- lambda1 lambda2))
(- lambda1 lambda2)
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 phi1) (sin phi2))
(sin phi1)
phi1
(sin phi2)
phi2
(* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))
(* (cos phi1) (cos phi2))
(cos phi1)
(cos phi2)
(+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))
(sin lambda2)
lambda2
(sin lambda1)
lambda1
(* (cos lambda2) (cos lambda1))
(cos lambda2)
(cos lambda1)
R
Outputs
(* (acos (+ (* (sin phi1) (sin phi2)) (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (* (cos phi1) (cos phi2))))) R)
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))))
(acos (+ (* (sin phi1) (sin phi2)) (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (* (cos phi1) (cos phi2)))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
(+ (* (sin phi1) (sin phi2)) (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (* (cos phi1) (cos phi2))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(sin phi1)
(sin.f64 phi1)
phi1
(sin phi2)
(sin.f64 phi2)
phi2
(* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (* (cos phi1) (cos phi2)))
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(* (cos lambda1) (cos lambda2))
(*.f64 (cos.f64 lambda1) (cos.f64 lambda2))
(cos lambda1)
(cos.f64 lambda1)
lambda1
(cos lambda2)
(cos.f64 lambda2)
lambda2
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(sin lambda1)
(sin.f64 lambda1)
(sin lambda2)
(sin.f64 lambda2)
(* (cos phi1) (cos phi2))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(cos phi1)
(cos.f64 phi1)
(cos phi2)
(cos.f64 phi2)
R
(* (acos (cos (- lambda1 lambda2))) R)
(*.f64 R (acos.f64 (cos.f64 (-.f64 lambda1 lambda2))))
(acos (cos (- lambda1 lambda2)))
(acos.f64 (cos.f64 (-.f64 lambda1 lambda2)))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
lambda1
lambda2
R
(* (acos (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (cos phi2)))) R)
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (cos phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* (sin phi1) (sin phi2)) (* (cos phi1) (cos phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(sin phi1)
(sin.f64 phi1)
phi1
(sin phi2)
(sin.f64 phi2)
phi2
(* (cos phi1) (cos phi2))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(cos phi1)
(cos.f64 phi1)
(cos phi2)
(cos.f64 phi2)
R
(* (acos (- (/ (cos (- phi1 phi2)) 2) (- (/ (cos (+ phi1 phi2)) 2) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))) R)
(*.f64 R (acos.f64 (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))))))
(acos (- (/ (cos (- phi1 phi2)) 2) (- (/ (cos (+ phi1 phi2)) 2) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(acos.f64 (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))))))
(- (/ (cos (- phi1 phi2)) 2) (- (/ (cos (+ phi1 phi2)) 2) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))))
(/ (cos (- phi1 phi2)) 2)
(/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))
(cos (- phi1 phi2))
(cos.f64 (-.f64 phi1 phi2))
(- phi1 phi2)
(-.f64 phi1 phi2)
phi1
phi2
2
#s(literal 2 binary64)
(- (/ (cos (+ phi1 phi2)) 2) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(/ (cos (+ phi1 phi2)) 2)
(/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64))
(cos (+ phi1 phi2))
(cos.f64 (+.f64 phi1 phi2))
(+ phi1 phi2)
(+.f64 phi1 phi2)
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(cos phi1)
(cos.f64 phi1)
(* (cos phi2) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))
(cos phi2)
(cos.f64 phi2)
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
lambda1
lambda2
R
(* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) R)
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))))
(acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
(+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(sin phi1)
(sin.f64 phi1)
phi1
(sin phi2)
(sin.f64 phi2)
phi2
(* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(* (cos phi1) (cos phi2))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(cos phi1)
(cos.f64 phi1)
(cos phi2)
(cos.f64 phi2)
(+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(sin lambda2)
(sin.f64 lambda2)
lambda2
(sin lambda1)
(sin.f64 lambda1)
lambda1
(* (cos lambda2) (cos lambda1))
(*.f64 (cos.f64 lambda1) (cos.f64 lambda2))
(cos lambda2)
(cos.f64 lambda2)
(cos lambda1)
(cos.f64 lambda1)
R

localize529.0ms (2.1%)

Memory
34.8MiB live, 1 092.8MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
✓accuracy99.7%
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))
✓accuracy99.7%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
✓accuracy99.7%
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
✓accuracy93.9%
(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))))))
✓accuracy93.9%
(acos.f64 (-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
✓accuracy79.1%
(cos.f64 (-.f64 phi1 phi2))
✓accuracy79.0%
(cos.f64 (-.f64 lambda1 lambda2))
✓accuracy78.9%
(cos.f64 (+.f64 phi1 phi2))
✓accuracy99.9%
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
✓accuracy99.7%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) R)
✓accuracy99.7%
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
✓accuracy77.6%
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
✓accuracy100.0%
(-.f64 lambda1 lambda2)
✓accuracy99.7%
(*.f64 (acos.f64 (cos.f64 (-.f64 lambda1 lambda2))) R)
✓accuracy79.0%
(cos.f64 (-.f64 lambda1 lambda2))
✓accuracy74.0%
(acos.f64 (cos.f64 (-.f64 lambda1 lambda2)))
✓accuracy99.7%
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
✓accuracy99.7%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)
✓accuracy99.7%
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
✓accuracy93.9%
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
Samples
352.0ms227×1valid
70.0ms27×2valid
11.0ms1×5exit
1.0ms1×0valid
Compiler

Compiled 509 to 51 computations (90% saved)

Precisions
Click to see histograms. Total time spent on operations: 370.0ms
ival-cos: 160.0ms (43.3% of total)
ival-acos: 63.0ms (17% of total)
ival-mult: 48.0ms (13% of total)
ival-sin: 43.0ms (11.6% of total)
adjust: 20.0ms (5.4% of total)
ival-add: 15.0ms (4.1% of total)
ival-div: 11.0ms (3% of total)
ival-sub: 9.0ms (2.4% of total)
exact: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)

series68.0ms (0.3%)

Memory
-14.4MiB live, 66.1MiB allocated
Counts
23 → 876
Calls
Call 1
Inputs
#<alt (* (acos (+ (* (sin phi1) (sin phi2)) (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (* (cos phi1) (cos phi2))))) R)>
#<alt (acos (+ (* (sin phi1) (sin phi2)) (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (* (cos phi1) (cos phi2)))))>
#<alt (+ (* (sin phi1) (sin phi2)) (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (* (cos phi1) (cos phi2))))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (acos (cos (- lambda1 lambda2))) R)>
#<alt (acos (cos (- lambda1 lambda2)))>
#<alt (cos (- lambda1 lambda2))>
#<alt (- lambda1 lambda2)>
#<alt (* (acos (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (cos phi2)))) R)>
#<alt (acos (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (cos phi2))))>
#<alt (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (cos phi2)))>
#<alt (- (/ (cos (- phi1 phi2)) 2) (- (/ (cos (+ phi1 phi2)) 2) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))>
#<alt (* (acos (- (/ (cos (- phi1 phi2)) 2) (- (/ (cos (+ phi1 phi2)) 2) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))) R)>
#<alt (acos (- (/ (cos (- phi1 phi2)) 2) (- (/ (cos (+ phi1 phi2)) 2) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))>
#<alt (/ (cos (- phi1 phi2)) 2)>
#<alt (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))>
#<alt (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) R)>
#<alt (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))))>
#<alt (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))>
#<alt (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (* (cos phi1) (cos phi2)))>
#<alt (cos (+ phi1 phi2))>
#<alt (cos (- phi1 phi2))>
#<alt (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))>
Outputs
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))>
#<alt (+ (* phi1 (sin phi2)) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (+ (* 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)))))>
#<alt (+ (* 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)))))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))>
#<alt (+ (* phi2 (sin phi1)) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (+ (* 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)))))>
#<alt (+ (* 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)))))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (+ (* 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))))>
#<alt (+ (* 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))))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (+ (* 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))))>
#<alt (+ (* 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))))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (* phi1 (sin phi2))>
#<alt (* phi1 (+ (sin phi2) (* -1/6 (* (pow phi1 2) (sin phi2)))))>
#<alt (* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* 1/120 (* (pow phi1 2) (sin phi2)))))))>
#<alt (* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (sin phi2))) (* 1/120 (sin phi2))))))))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* phi2 (sin phi1))>
#<alt (* phi2 (+ (sin phi1) (* -1/6 (* (pow phi2 2) (sin phi1)))))>
#<alt (* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* 1/120 (* (pow phi2 2) (sin phi1)))))))>
#<alt (* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (sin phi1))) (* 1/120 (sin phi1))))))))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* -1 (* R lambda2))>
#<alt (+ (* -1 (* R lambda2)) (* R lambda1))>
#<alt (+ (* -1 (* R lambda2)) (* R lambda1))>
#<alt (+ (* -1 (* R lambda2)) (* R lambda1))>
#<alt (* R lambda1)>
#<alt (* lambda1 (+ R (* -1 (/ (* R lambda2) lambda1))))>
#<alt (* lambda1 (+ R (* -1 (/ (* R lambda2) lambda1))))>
#<alt (* lambda1 (+ R (* -1 (/ (* R lambda2) lambda1))))>
#<alt (* R lambda1)>
#<alt (* -1 (* lambda1 (+ (* -1 R) (/ (* R lambda2) lambda1))))>
#<alt (* -1 (* lambda1 (+ (* -1 R) (/ (* R lambda2) lambda1))))>
#<alt (* -1 (* lambda1 (+ (* -1 R) (/ (* R lambda2) lambda1))))>
#<alt (* R lambda1)>
#<alt (+ (* -1 (* R lambda2)) (* R lambda1))>
#<alt (+ (* -1 (* R lambda2)) (* R lambda1))>
#<alt (+ (* -1 (* R lambda2)) (* R lambda1))>
#<alt (* -1 (* R lambda2))>
#<alt (* lambda2 (+ (* -1 R) (/ (* R lambda1) lambda2)))>
#<alt (* lambda2 (+ (* -1 R) (/ (* R lambda1) lambda2)))>
#<alt (* lambda2 (+ (* -1 R) (/ (* R lambda1) lambda2)))>
#<alt (* -1 (* R lambda2))>
#<alt (* -1 (* lambda2 (+ R (* -1 (/ (* R lambda1) lambda2)))))>
#<alt (* -1 (* lambda2 (+ R (* -1 (/ (* R lambda1) lambda2)))))>
#<alt (* -1 (* lambda2 (+ R (* -1 (/ (* R lambda1) lambda2)))))>
#<alt (* R (- lambda1 lambda2))>
#<alt (* R (- lambda1 lambda2))>
#<alt (* R (- lambda1 lambda2))>
#<alt (* R (- lambda1 lambda2))>
#<alt (* R (- lambda1 lambda2))>
#<alt (* R (- lambda1 lambda2))>
#<alt (* R (- lambda1 lambda2))>
#<alt (* R (- lambda1 lambda2))>
#<alt (* R (- lambda1 lambda2))>
#<alt (* R (- lambda1 lambda2))>
#<alt (* R (- lambda1 lambda2))>
#<alt (* R (- lambda1 lambda2))>
#<alt (* -1 lambda2)>
#<alt (- lambda1 lambda2)>
#<alt (- lambda1 lambda2)>
#<alt (- lambda1 lambda2)>
#<alt lambda1>
#<alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))>
#<alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))>
#<alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))>
#<alt lambda1>
#<alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))>
#<alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))>
#<alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))>
#<alt lambda1>
#<alt (+ lambda1 (* -1 lambda2))>
#<alt (+ lambda1 (* -1 lambda2))>
#<alt (+ lambda1 (* -1 lambda2))>
#<alt (* -1 lambda2)>
#<alt (* lambda2 (- (/ lambda1 lambda2) 1))>
#<alt (* lambda2 (- (/ lambda1 lambda2) 1))>
#<alt (* lambda2 (- (/ lambda1 lambda2) 1))>
#<alt (* -1 lambda2)>
#<alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))>
#<alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))>
#<alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))>
#<alt (cos (neg lambda2))>
#<alt (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))>
#<alt (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))>
#<alt (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))>
#<alt (cos (- lambda1 lambda2))>
#<alt (cos (- lambda1 lambda2))>
#<alt (cos (- lambda1 lambda2))>
#<alt (cos (- lambda1 lambda2))>
#<alt (cos (neg (+ lambda2 (* -1 lambda1))))>
#<alt (cos (neg (+ lambda2 (* -1 lambda1))))>
#<alt (cos (neg (+ lambda2 (* -1 lambda1))))>
#<alt (cos (neg (+ lambda2 (* -1 lambda1))))>
#<alt (cos lambda1)>
#<alt (+ (cos lambda1) (* lambda2 (sin lambda1)))>
#<alt (+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))>
#<alt (+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))>
#<alt (cos (- lambda1 lambda2))>
#<alt (cos (- lambda1 lambda2))>
#<alt (cos (- lambda1 lambda2))>
#<alt (cos (- lambda1 lambda2))>
#<alt (cos (+ lambda1 (* -1 lambda2)))>
#<alt (cos (+ lambda1 (* -1 lambda2)))>
#<alt (cos (+ lambda1 (* -1 lambda2)))>
#<alt (cos (+ lambda1 (* -1 lambda2)))>
#<alt (* -1 lambda2)>
#<alt (- lambda1 lambda2)>
#<alt (- lambda1 lambda2)>
#<alt (- lambda1 lambda2)>
#<alt lambda1>
#<alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))>
#<alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))>
#<alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))>
#<alt lambda1>
#<alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))>
#<alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))>
#<alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))>
#<alt lambda1>
#<alt (+ lambda1 (* -1 lambda2))>
#<alt (+ lambda1 (* -1 lambda2))>
#<alt (+ lambda1 (* -1 lambda2))>
#<alt (* -1 lambda2)>
#<alt (* lambda2 (- (/ lambda1 lambda2) 1))>
#<alt (* lambda2 (- (/ lambda1 lambda2) 1))>
#<alt (* lambda2 (- (/ lambda1 lambda2) 1))>
#<alt (* -1 lambda2)>
#<alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))>
#<alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))>
#<alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))>
#<alt (* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (cos phi2)>
#<alt (+ (cos phi2) (* phi1 (sin phi2)))>
#<alt (+ (cos phi2) (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (cos phi2))))))>
#<alt (+ (cos phi2) (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (cos phi2)) (* -1/6 (* phi1 (sin phi2))))))))>
#<alt (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))>
#<alt (cos phi1)>
#<alt (+ (cos phi1) (* phi2 (sin phi1)))>
#<alt (+ (cos phi1) (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (cos phi1))))))>
#<alt (+ (cos phi1) (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (cos phi1)) (* -1/6 (* phi2 (sin phi1))))))))>
#<alt (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))>
#<alt (- (+ (* 1/2 (cos (neg phi2))) (* (cos phi2) (cos (- lambda1 lambda2)))) (* 1/2 (cos phi2)))>
#<alt (- (+ (* 1/2 (cos (neg phi2))) (+ (* phi1 (- (* -1/2 (sin (neg phi2))) (* -1/2 (sin phi2)))) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos phi2)))>
#<alt (- (+ (* 1/2 (cos (neg phi2))) (+ (* phi1 (- (+ (* -1/2 (sin (neg phi2))) (* phi1 (- (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/4 (cos (neg phi2)))) (* -1/4 (cos phi2))))) (* -1/2 (sin phi2)))) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos phi2)))>
#<alt (- (+ (* 1/2 (cos (neg phi2))) (+ (* phi1 (- (+ (* -1/2 (sin (neg phi2))) (* phi1 (- (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* -1/4 (cos (neg phi2))) (* phi1 (- (* 1/12 (sin (neg phi2))) (* 1/12 (sin phi2)))))) (* -1/4 (cos phi2))))) (* -1/2 (sin phi2)))) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos phi2)))>
#<alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))>
#<alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))>
#<alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))>
#<alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))>
#<alt (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))>
#<alt (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))>
#<alt (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))>
#<alt (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))>
#<alt (* (cos phi1) (cos (- lambda1 lambda2)))>
#<alt (+ (* phi2 (- (* 1/2 (sin phi1)) (* -1/2 (sin phi1)))) (* (cos phi1) (cos (- lambda1 lambda2))))>
#<alt (+ (* phi2 (- (+ (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (sin phi1))) (* -1/2 (sin phi1)))) (* (cos phi1) (cos (- lambda1 lambda2))))>
#<alt (+ (* phi2 (- (+ (* 1/2 (sin phi1)) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* phi2 (- (* -1/12 (sin phi1)) (* 1/12 (sin phi1))))))) (* -1/2 (sin phi1)))) (* (cos phi1) (cos (- lambda1 lambda2))))>
#<alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))>
#<alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))>
#<alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))>
#<alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))>
#<alt (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))>
#<alt (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))>
#<alt (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))>
#<alt (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))>
#<alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/2 (cos (+ phi1 phi2))))>
#<alt (- (+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))>
#<alt (- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))>
#<alt (- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))>
#<alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))>
#<alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))>
#<alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))>
#<alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))>
#<alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))>
#<alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))>
#<alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))>
#<alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))>
#<alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* 1/2 (cos (+ phi1 phi2))))>
#<alt (- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* 1/2 (cos (+ phi1 phi2))))>
#<alt (- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* 1/2 (cos (+ phi1 phi2))))>
#<alt (- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* 1/2 (cos (+ phi1 phi2))))>
#<alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))>
#<alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))>
#<alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))>
#<alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))>
#<alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))>
#<alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))>
#<alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))>
#<alt (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))>
#<alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (* R (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))))>
#<alt (* R (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))))>
#<alt (* R (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))))>
#<alt (* R (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))))>
#<alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (* R (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))))>
#<alt (* R (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))))>
#<alt (* R (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))))>
#<alt (* R (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))))>
#<alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))>
#<alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))>
#<alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))>
#<alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))>
#<alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))>
#<alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))>
#<alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))>
#<alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))>
#<alt (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1))))))>
#<alt (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1))))))>
#<alt (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1))))))>
#<alt (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1))))))>
#<alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))>
#<alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))>
#<alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))>
#<alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))>
#<alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))>
#<alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))>
#<alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))>
#<alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))>
#<alt (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2))))))>
#<alt (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2))))))>
#<alt (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2))))))>
#<alt (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2))))))>
#<alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))>
#<alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))>
#<alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))>
#<alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))>
#<alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))>
#<alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))>
#<alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))>
#<alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))>
#<alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2)))))>
#<alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2)))))>
#<alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2)))))>
#<alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2)))))>
#<alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))>
#<alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))>
#<alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))>
#<alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))>
#<alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))>
#<alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))>
#<alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))>
#<alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))>
#<alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))>
#<alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))>
#<alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))>
#<alt (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))>
#<alt (* 1/2 (cos (neg phi2)))>
#<alt (+ (* -1/2 (* phi1 (sin (neg phi2)))) (* 1/2 (cos (neg phi2))))>
#<alt (+ (* 1/2 (cos (neg phi2))) (* phi1 (+ (* -1/2 (sin (neg phi2))) (* -1/4 (* phi1 (cos (neg phi2)))))))>
#<alt (+ (* 1/2 (cos (neg phi2))) (* phi1 (+ (* -1/2 (sin (neg phi2))) (* phi1 (+ (* -1/4 (cos (neg phi2))) (* 1/12 (* phi1 (sin (neg phi2)))))))))>
#<alt (* 1/2 (cos (- phi1 phi2)))>
#<alt (* 1/2 (cos (- phi1 phi2)))>
#<alt (* 1/2 (cos (- phi1 phi2)))>
#<alt (* 1/2 (cos (- phi1 phi2)))>
#<alt (* 1/2 (cos (neg (+ phi2 (* -1 phi1)))))>
#<alt (* 1/2 (cos (neg (+ phi2 (* -1 phi1)))))>
#<alt (* 1/2 (cos (neg (+ phi2 (* -1 phi1)))))>
#<alt (* 1/2 (cos (neg (+ phi2 (* -1 phi1)))))>
#<alt (* 1/2 (cos phi1))>
#<alt (+ (* 1/2 (cos phi1)) (* 1/2 (* phi2 (sin phi1))))>
#<alt (+ (* 1/2 (cos phi1)) (* phi2 (+ (* -1/4 (* phi2 (cos phi1))) (* 1/2 (sin phi1)))))>
#<alt (+ (* 1/2 (cos phi1)) (* phi2 (+ (* 1/2 (sin phi1)) (* phi2 (+ (* -1/4 (cos phi1)) (* -1/12 (* phi2 (sin phi1))))))))>
#<alt (* 1/2 (cos (- phi1 phi2)))>
#<alt (* 1/2 (cos (- phi1 phi2)))>
#<alt (* 1/2 (cos (- phi1 phi2)))>
#<alt (* 1/2 (cos (- phi1 phi2)))>
#<alt (* 1/2 (cos (+ phi1 (* -1 phi2))))>
#<alt (* 1/2 (cos (+ phi1 (* -1 phi2))))>
#<alt (* 1/2 (cos (+ phi1 (* -1 phi2))))>
#<alt (* 1/2 (cos (+ phi1 (* -1 phi2))))>
#<alt (cos lambda1)>
#<alt (+ (cos lambda1) (* lambda2 (sin lambda1)))>
#<alt (+ (cos lambda1) (* lambda2 (+ (sin lambda1) (* -1/2 (* lambda2 (cos lambda1))))))>
#<alt (+ (cos lambda1) (* lambda2 (+ (sin lambda1) (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))))))>
#<alt (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))>
#<alt (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))>
#<alt (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))>
#<alt (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))>
#<alt (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))>
#<alt (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))>
#<alt (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))>
#<alt (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))>
#<alt (cos lambda2)>
#<alt (+ (cos lambda2) (* lambda1 (sin lambda2)))>
#<alt (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))>
#<alt (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))))))>
#<alt (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))>
#<alt (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))>
#<alt (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))>
#<alt (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))>
#<alt (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))>
#<alt (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))>
#<alt (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))>
#<alt (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))>
#<alt (+ (* phi1 (sin phi2)) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (+ (* 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)))))>
#<alt (+ (* 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)))))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))>
#<alt (+ (* phi2 (sin phi1)) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (+ (* 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)))))>
#<alt (+ (* 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)))))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (+ (* 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))))>
#<alt (+ (* 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))))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (+ (* 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))))>
#<alt (+ (* 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))))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (* (cos lambda2) (* (cos phi1) (cos phi2)))>
#<alt (+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi1) (cos phi2))))>
#<alt (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (* (cos phi1) (cos phi2))))>
#<alt (+ (* 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))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos lambda1) (* (cos phi1) (cos phi2)))>
#<alt (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (* (cos phi1) (cos phi2))))>
#<alt (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))>
#<alt (+ (* 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))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))>
#<alt (+ (* -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)))))>
#<alt (+ (* (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)))))))))>
#<alt (+ (* (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))))))))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))>
#<alt (+ (* -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)))))>
#<alt (+ (* (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)))))))))>
#<alt (+ (* (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))))))))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (cos phi2)>
#<alt (+ (cos phi2) (* -1 (* phi1 (sin phi2))))>
#<alt (+ (cos phi2) (* phi1 (- (* -1/2 (* phi1 (cos phi2))) (sin phi2))))>
#<alt (+ (cos phi2) (* phi1 (- (* phi1 (+ (* -1/2 (cos phi2)) (* 1/6 (* phi1 (sin phi2))))) (sin phi2))))>
#<alt (cos (+ phi1 phi2))>
#<alt (cos (+ phi1 phi2))>
#<alt (cos (+ phi1 phi2))>
#<alt (cos (+ phi1 phi2))>
#<alt (cos (- phi2 (* -1 phi1)))>
#<alt (cos (- phi2 (* -1 phi1)))>
#<alt (cos (- phi2 (* -1 phi1)))>
#<alt (cos (- phi2 (* -1 phi1)))>
#<alt (cos phi1)>
#<alt (+ (cos phi1) (* -1 (* phi2 (sin phi1))))>
#<alt (+ (cos phi1) (* phi2 (- (* -1/2 (* phi2 (cos phi1))) (sin phi1))))>
#<alt (+ (cos phi1) (* phi2 (- (* phi2 (+ (* -1/2 (cos phi1)) (* 1/6 (* phi2 (sin phi1))))) (sin phi1))))>
#<alt (cos (+ phi1 phi2))>
#<alt (cos (+ phi1 phi2))>
#<alt (cos (+ phi1 phi2))>
#<alt (cos (+ phi1 phi2))>
#<alt (cos (- phi1 (* -1 phi2)))>
#<alt (cos (- phi1 (* -1 phi2)))>
#<alt (cos (- phi1 (* -1 phi2)))>
#<alt (cos (- phi1 (* -1 phi2)))>
#<alt (cos (neg phi2))>
#<alt (+ (cos (neg phi2)) (* -1 (* phi1 (sin (neg phi2)))))>
#<alt (+ (cos (neg phi2)) (* phi1 (- (* -1/2 (* phi1 (cos (neg phi2)))) (sin (neg phi2)))))>
#<alt (+ (cos (neg phi2)) (* phi1 (- (* phi1 (+ (* -1/2 (cos (neg phi2))) (* 1/6 (* phi1 (sin (neg phi2)))))) (sin (neg phi2)))))>
#<alt (cos (- phi1 phi2))>
#<alt (cos (- phi1 phi2))>
#<alt (cos (- phi1 phi2))>
#<alt (cos (- phi1 phi2))>
#<alt (cos (neg (+ phi2 (* -1 phi1))))>
#<alt (cos (neg (+ phi2 (* -1 phi1))))>
#<alt (cos (neg (+ phi2 (* -1 phi1))))>
#<alt (cos (neg (+ phi2 (* -1 phi1))))>
#<alt (cos phi1)>
#<alt (+ (cos phi1) (* phi2 (sin phi1)))>
#<alt (+ (cos phi1) (* phi2 (- (* -1/2 (* phi2 (cos phi1))) (* -1 (sin phi1)))))>
#<alt (+ (cos phi1) (* phi2 (- (* phi2 (+ (* -1/2 (cos phi1)) (* -1/6 (* phi2 (sin phi1))))) (* -1 (sin phi1)))))>
#<alt (cos (- phi1 phi2))>
#<alt (cos (- phi1 phi2))>
#<alt (cos (- phi1 phi2))>
#<alt (cos (- phi1 phi2))>
#<alt (cos (+ phi1 (* -1 phi2)))>
#<alt (cos (+ phi1 (* -1 phi2)))>
#<alt (cos (+ phi1 (* -1 phi2)))>
#<alt (cos (+ phi1 (* -1 phi2)))>
#<alt (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))>
#<alt (+ (* -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)))))>
#<alt (+ (* (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)))))))))>
#<alt (+ (* (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))))))))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))>
#<alt (+ (* -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)))))>
#<alt (+ (* (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)))))))))>
#<alt (+ (* (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))))))))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos lambda1) (* (cos phi1) (cos phi2)))>
#<alt (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (* (cos phi1) (cos phi2))))>
#<alt (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))>
#<alt (+ (* 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))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos lambda2) (* (cos phi1) (cos phi2)))>
#<alt (+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi1) (cos phi2))))>
#<alt (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (* (cos phi1) (cos phi2))))>
#<alt (+ (* 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))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
Calls

219 calls:

TimeVariablePointExpression
21.0ms
phi1
@0
(- (/ (cos (- phi1 phi2)) 2) (- (/ (cos (+ phi1 phi2)) 2) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
2.0ms
phi1
@-inf
(- (/ (cos (- phi1 phi2)) 2) (- (/ (cos (+ phi1 phi2)) 2) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
1.0ms
lambda1
@inf
(- (/ (cos (- phi1 phi2)) 2) (- (/ (cos (+ phi1 phi2)) 2) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
1.0ms
lambda2
@inf
(- (/ (cos (- phi1 phi2)) 2) (- (/ (cos (+ phi1 phi2)) 2) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
1.0ms
phi1
@inf
(- (/ (cos (- phi1 phi2)) 2) (- (/ (cos (+ phi1 phi2)) 2) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))

rewrite481.0ms (2%)

Memory
9.9MiB live, 728.8MiB allocated
Algorithm
1×batch-egg-rewrite
Rules
5 602×accelerator-lowering-fma.f32
5 602×accelerator-lowering-fma.f64
4 210×/-lowering-/.f32
4 210×/-lowering-/.f64
4 010×*-lowering-*.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
049230
1274226
22485226
09137217
Stop Event
1×iter limit
1×node limit
Counts
23 → 988
Calls
Call 1
Inputs
(* (acos (+ (* (sin phi1) (sin phi2)) (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (* (cos phi1) (cos phi2))))) R)
(acos (+ (* (sin phi1) (sin phi2)) (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (* (cos phi1) (cos phi2)))))
(+ (* (sin phi1) (sin phi2)) (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (* (cos phi1) (cos phi2))))
(* (sin phi1) (sin phi2))
(* (acos (cos (- lambda1 lambda2))) R)
(acos (cos (- lambda1 lambda2)))
(cos (- lambda1 lambda2))
(- lambda1 lambda2)
(* (acos (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (cos phi2)))) R)
(acos (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (cos phi2))))
(+ (* (sin phi1) (sin phi2)) (* (cos phi1) (cos phi2)))
(- (/ (cos (- phi1 phi2)) 2) (- (/ (cos (+ phi1 phi2)) 2) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(* (acos (- (/ (cos (- phi1 phi2)) 2) (- (/ (cos (+ phi1 phi2)) 2) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))) R)
(acos (- (/ (cos (- phi1 phi2)) 2) (- (/ (cos (+ phi1 phi2)) 2) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(/ (cos (- phi1 phi2)) 2)
(+ (* (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)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))
(* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (* (cos phi1) (cos phi2)))
(cos (+ phi1 phi2))
(cos (- phi1 phi2))
(* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))
Outputs
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(-.f64 (/.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 8 binary64)) (+.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (/.f64 (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 3 binary64)) (+.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))))
(-.f64 (/.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (/.f64 (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(/.f64 (-.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 8 binary64)) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(/.f64 (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(/.f64 (neg.f64 (-.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 8 binary64)) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)))) (neg.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(/.f64 (+.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 8 binary64)) (pow.f64 (neg.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 (*.f64 (neg.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (neg.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+.f64 (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)))
(+.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (+.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))))
(-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(-.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(-.f64 (/.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 8 binary64)) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))) (/.f64 (pow.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 3 binary64)) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(-.f64 (/.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) #s(literal 4 binary64)) (+.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 (pow.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 (/.f64 (*.f64 (cos.f64 (-.f64 phi1 phi2)) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))) (/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 8 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64)))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(-.f64 (/.f64 (*.f64 (cos.f64 (-.f64 phi1 phi2)) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 phi1 phi2))) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))) (/.f64 (*.f64 #s(literal -2 binary64) (-.f64 (/.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 8 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64)))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(-.f64 (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 phi1 phi2))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 (*.f64 #s(literal -2 binary64) (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 (/.f64 (*.f64 #s(literal 1 binary64) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (*.f64 (/.f64 #s(literal 2 binary64) (cos.f64 (-.f64 phi1 phi2))) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))) (/.f64 (*.f64 (/.f64 #s(literal 2 binary64) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 8 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64)))) (*.f64 (/.f64 #s(literal 2 binary64) (cos.f64 (-.f64 phi1 phi2))) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(-.f64 (/.f64 (*.f64 #s(literal 1 binary64) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (*.f64 (/.f64 #s(literal 2 binary64) (cos.f64 (-.f64 phi1 phi2))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 (*.f64 (/.f64 #s(literal 2 binary64) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))))) (*.f64 (/.f64 #s(literal 2 binary64) (cos.f64 (-.f64 phi1 phi2))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 (/.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(-.f64 (/.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) #s(literal 4 binary64)) (-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (/.f64 (pow.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(fma.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (+.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (+.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (+.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (+.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (+.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64) (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(fma.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (/.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(fma.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal -1/2 binary64) (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(fma.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(fma.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 #s(literal -1 binary64) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (+.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2) (+.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (+.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (+.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (+.f64 phi1 phi2))))) (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(fma.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(fma.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (+.f64 phi1 phi2)))) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi1 phi2)) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (+.f64 phi1 phi2))))) (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 8 binary64)) (pow.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 3 binary64))) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 8 binary64)) (pow.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 3 binary64))) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) #s(literal 4 binary64)) (-.f64 (pow.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (*.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 8 binary64)) (pow.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(/.f64 (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))) (+.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/.f64 (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))) (-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 8 binary64)) (pow.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))))))
(/.f64 (-.f64 (*.f64 (cos.f64 (-.f64 phi1 phi2)) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 8 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(/.f64 (-.f64 (*.f64 (cos.f64 (-.f64 phi1 phi2)) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 phi1 phi2))) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (*.f64 #s(literal -2 binary64) (-.f64 (/.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 8 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 phi1 phi2))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (*.f64 #s(literal -2 binary64) (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))))))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (*.f64 (/.f64 #s(literal 2 binary64) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 8 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))))) (*.f64 (/.f64 #s(literal 2 binary64) (cos.f64 (-.f64 phi1 phi2))) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (*.f64 (/.f64 #s(literal 2 binary64) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))))))) (*.f64 (/.f64 #s(literal 2 binary64) (cos.f64 (-.f64 phi1 phi2))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))))) (neg.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/.f64 (neg.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 8 binary64)) (pow.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(/.f64 (neg.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 8 binary64)) (pow.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) #s(literal 4 binary64)) (-.f64 (pow.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (*.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))))
(/.f64 (neg.f64 (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)))) (neg.f64 (+.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(/.f64 (neg.f64 (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(/.f64 (-.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 phi1)) (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 (*.f64 (cos.f64 (-.f64 phi1 phi2)) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 8 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64)))))) (neg.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (cos.f64 (-.f64 phi1 phi2)) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))))))) (neg.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 phi1 phi2))) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (*.f64 #s(literal -2 binary64) (-.f64 (/.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 8 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64)))))) (neg.f64 (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 phi1 phi2))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (*.f64 #s(literal -2 binary64) (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))))))) (neg.f64 (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1 binary64) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (*.f64 (/.f64 #s(literal 2 binary64) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 8 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64)))))) (neg.f64 (*.f64 (/.f64 #s(literal 2 binary64) (cos.f64 (-.f64 phi1 phi2))) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1 binary64) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (*.f64 (/.f64 #s(literal 2 binary64) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))))))) (neg.f64 (*.f64 (/.f64 #s(literal 2 binary64) (cos.f64 (-.f64 phi1 phi2))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))))))) (neg.f64 (neg.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 8 binary64)) (pow.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (+.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))))) (neg.f64 (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(/.f64 (+.f64 (neg.f64 (pow.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 3 binary64))) (/.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 8 binary64))) (+.f64 (pow.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (+.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (+.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))))
(/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 3 binary64))) (+.f64 (*.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))))
(pow.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 8 binary64)) (pow.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))))
(*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 8 binary64)) (pow.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(*.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(*.f64 (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(+.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (neg.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64))))
(+.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64)))
(-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)))
(-.f64 (/.f64 (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) #s(literal 4 binary64)) (/.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 phi1 phi2))) #s(literal 4 binary64)))
(-.f64 (/.f64 (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal -2 binary64)) #s(literal -4 binary64)) (/.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 phi1 phi2)))) #s(literal -4 binary64)))
(-.f64 (/.f64 (*.f64 (cos.f64 (-.f64 phi1 phi2)) (/.f64 #s(literal 2 binary64) (cos.f64 (+.f64 phi1 phi2)))) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (cos.f64 (+.f64 phi1 phi2))))) (/.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(-.f64 (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) #s(literal -4 binary64)) (/.f64 (*.f64 #s(literal -2 binary64) (cos.f64 (+.f64 phi1 phi2))) #s(literal -4 binary64)))
(-.f64 (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal -2 binary64)) #s(literal 4 binary64)) (/.f64 (*.f64 #s(literal -2 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 phi1 phi2)))) #s(literal 4 binary64)))
(-.f64 (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 phi1 phi2))) (/.f64 #s(literal 2 binary64) (cos.f64 (+.f64 phi1 phi2)))) (*.f64 #s(literal -2 binary64) (/.f64 #s(literal 2 binary64) (cos.f64 (+.f64 phi1 phi2))))) (/.f64 #s(literal -2 binary64) (*.f64 #s(literal -2 binary64) (/.f64 #s(literal 2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(-.f64 (/.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64))) (/.f64 (*.f64 (/.f64 #s(literal 2 binary64) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (+.f64 phi1 phi2))) (*.f64 (/.f64 #s(literal 2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(-.f64 (/.f64 #s(literal -2 binary64) (*.f64 (/.f64 #s(literal 2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal -2 binary64))) (/.f64 (*.f64 (/.f64 #s(literal 2 binary64) (cos.f64 (-.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 phi1 phi2)))) (*.f64 (/.f64 #s(literal 2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal -2 binary64))))
(-.f64 (/.f64 (*.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (cos.f64 (+.f64 phi1 phi2)))) (*.f64 (/.f64 #s(literal 2 binary64) (cos.f64 (-.f64 phi1 phi2))) (/.f64 #s(literal 2 binary64) (cos.f64 (+.f64 phi1 phi2))))) (/.f64 (*.f64 (/.f64 #s(literal 2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1 binary64)) (*.f64 (/.f64 #s(literal 2 binary64) (cos.f64 (-.f64 phi1 phi2))) (/.f64 #s(literal 2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(-.f64 (/.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 8 binary64)) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) #s(literal 4 binary64)) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)))))) (/.f64 (/.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 8 binary64)) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) #s(literal 4 binary64)) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)))))))
(-.f64 (/.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) #s(literal 4 binary64)) (+.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)))) (/.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (+.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)))))
(fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64) (neg.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64))))
(fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64)))
(fma.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (/.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (neg.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64))))
(fma.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (/.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64)))
(fma.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal -1/2 binary64) (neg.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64))))
(fma.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal -1/2 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64)))
(fma.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (neg.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64))))
(fma.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64)))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (neg.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64)))
(fma.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal -1 binary64)) (neg.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64))))
(fma.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal -1 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64)))
(fma.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (+.f64 phi1 phi2))))) (neg.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64))))
(fma.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (+.f64 phi1 phi2))))) (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64)))
(fma.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (neg.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64))))
(fma.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64)))
(fma.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (+.f64 phi1 phi2)))) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi1 phi2)) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (+.f64 phi1 phi2))))) (neg.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64))))
(fma.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (+.f64 phi1 phi2)))) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi1 phi2)) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (+.f64 phi1 phi2))))) (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64)))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))))
(/.f64 (-.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 phi1 phi2)))) #s(literal -2 binary64))
(/.f64 (-.f64 (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 phi1 phi2)))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 phi1 phi2))))) #s(literal -4 binary64))
(/.f64 (-.f64 (*.f64 (cos.f64 (-.f64 phi1 phi2)) (/.f64 #s(literal 2 binary64) (cos.f64 (+.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) (cos.f64 (+.f64 phi1 phi2)))) #s(literal -4 binary64))
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 phi1 phi2))))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 phi1 phi2))) (/.f64 #s(literal 2 binary64) (cos.f64 (+.f64 phi1 phi2)))) #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) (/.f64 #s(literal 2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(/.f64 (-.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 2 binary64) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (+.f64 phi1 phi2)))) (*.f64 (/.f64 #s(literal 2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(/.f64 (-.f64 #s(literal -2 binary64) (*.f64 (/.f64 #s(literal 2 binary64) (cos.f64 (-.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 phi1 phi2))))) (*.f64 (/.f64 #s(literal 2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal -2 binary64)))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (cos.f64 (+.f64 phi1 phi2)))) (*.f64 (/.f64 #s(literal 2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1 binary64))) (*.f64 (/.f64 #s(literal 2 binary64) (cos.f64 (-.f64 phi1 phi2))) (/.f64 #s(literal 2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) #s(literal -2 binary64))
(/.f64 (/.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 3 binary64))) #s(literal 8 binary64)) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) #s(literal 4 binary64)) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64))))))
(/.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2)))))) #s(literal 4 binary64)) (+.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64))))
(/.f64 (-.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 phi1 phi2)))) (cos.f64 (+.f64 phi1 phi2))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (neg.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 phi1 phi2))))) #s(literal 2 binary64))
(/.f64 (-.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 phi1 phi2)))) (neg.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 phi1 phi2))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 phi1 phi2))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 phi1 phi2))))) #s(literal -4 binary64))
(/.f64 (neg.f64 (-.f64 (*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 phi1 phi2)))))) #s(literal 4 binary64))
(/.f64 (neg.f64 (-.f64 (*.f64 (cos.f64 (-.f64 phi1 phi2)) (/.f64 #s(literal 2 binary64) (cos.f64 (+.f64 phi1 phi2)))) #s(literal 2 binary64))) (neg.f64 (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) (cos.f64 (+.f64 phi1 phi2))))) #s(literal 4 binary64))
(/.f64 (neg.f64 (-.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 phi1 phi2)))))) #s(literal -4 binary64))
(/.f64 (neg.f64 (-.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 phi1 phi2))) (/.f64 #s(literal 2 binary64) (cos.f64 (+.f64 phi1 phi2)))) #s(literal -2 binary64))) (neg.f64 (*.f64 #s(literal -2 binary64) (/.f64 #s(literal 2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(/.f64 (neg.f64 (-.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 2 binary64) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (+.f64 phi1 phi2))))) (neg.f64 (*.f64 (/.f64 #s(literal 2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal -2 binary64) (*.f64 (/.f64 #s(literal 2 binary64) (cos.f64 (-.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 phi1 phi2)))))) (neg.f64 (*.f64 (/.f64 #s(literal 2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal -2 binary64))))
(/.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (cos.f64 (+.f64 phi1 phi2)))) (*.f64 (/.f64 #s(literal 2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1 binary64)))) (neg.f64 (*.f64 (/.f64 #s(literal 2 binary64) (cos.f64 (-.f64 phi1 phi2))) (/.f64 #s(literal 2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (/.f64 (-.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 3 binary64))) #s(literal 8 binary64))) (neg.f64 (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) #s(literal 4 binary64)) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)))))))
(/.f64 (neg.f64 (/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2)))))) #s(literal 4 binary64))) (neg.f64 (+.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)))))
(/.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 8 binary64)) (pow.f64 (neg.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64))) #s(literal 3 binary64))) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) #s(literal 4 binary64)) (-.f64 (*.f64 (neg.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64))) (neg.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)))) (*.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (neg.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)))))))
(/.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 8 binary64)) (pow.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) #s(literal 4 binary64)) (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64))) (*.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64))))))
(pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) #s(literal -1 binary64))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(*.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))
(+.f64 (*.f64 R lambda1) (*.f64 R (-.f64 #s(literal 0 binary64) lambda2)))
(+.f64 (*.f64 lambda1 R) (*.f64 (-.f64 #s(literal 0 binary64) lambda2) R))
(fma.f64 lambda1 R (*.f64 (-.f64 #s(literal 0 binary64) lambda2) R))
(fma.f64 R lambda1 (*.f64 R (-.f64 #s(literal 0 binary64) lambda2)))
(/.f64 (*.f64 R (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2)))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (*.f64 R (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (+.f64 lambda1 lambda2))
(/.f64 (*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) R) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) R) (+.f64 lambda1 lambda2))
(/.f64 (neg.f64 (*.f64 R (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))))) (neg.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (neg.f64 (*.f64 R (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))) (neg.f64 (+.f64 lambda1 lambda2)))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) R)) (neg.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) R)) (neg.f64 (+.f64 lambda1 lambda2)))
(/.f64 (+.f64 (pow.f64 (*.f64 R lambda1) #s(literal 3 binary64)) (pow.f64 (*.f64 R (-.f64 #s(literal 0 binary64) lambda2)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 R lambda1) (*.f64 R lambda1)) (-.f64 (*.f64 (*.f64 R (-.f64 #s(literal 0 binary64) lambda2)) (*.f64 R (-.f64 #s(literal 0 binary64) lambda2))) (*.f64 (*.f64 R lambda1) (*.f64 R (-.f64 #s(literal 0 binary64) lambda2))))))
(/.f64 (+.f64 (pow.f64 (*.f64 lambda1 R) #s(literal 3 binary64)) (pow.f64 (*.f64 (-.f64 #s(literal 0 binary64) lambda2) R) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 lambda1 R) (*.f64 lambda1 R)) (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) lambda2) R) (*.f64 (-.f64 #s(literal 0 binary64) lambda2) R)) (*.f64 (*.f64 lambda1 R) (*.f64 (-.f64 #s(literal 0 binary64) lambda2) R)))))
(*.f64 R (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) R)
(acos.f64 (cos.f64 (-.f64 lambda1 lambda2)))
(+.f64 lambda1 (-.f64 #s(literal 0 binary64) lambda2))
(+.f64 lambda2 (neg.f64 lambda1))
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2))))
(+.f64 (-.f64 #s(literal 0 binary64) lambda2) lambda1)
(fabs.f64 (remainder.f64 (-.f64 lambda1 lambda2) (*.f64 #s(literal 2 binary64) (PI.f64))))
(fabs.f64 (neg.f64 (remainder.f64 (-.f64 lambda1 lambda2) (*.f64 #s(literal 2 binary64) (PI.f64)))))
(fabs.f64 (neg.f64 (neg.f64 (remainder.f64 (-.f64 lambda1 lambda2) (*.f64 #s(literal 2 binary64) (PI.f64))))))
(-.f64 lambda1 lambda2)
(-.f64 lambda2 lambda1)
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))
(-.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)) (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))
(-.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)) (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))
(-.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (+.f64 (*.f64 lambda2 lambda2) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda2)))) (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (+.f64 (*.f64 lambda2 lambda2) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda2)))))
(-.f64 (/.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 8 binary64)) (+.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2))) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))))) (/.f64 (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)) (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))) (+.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2))) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))))))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (-.f64 #s(literal 0 binary64) lambda2))) (/.f64 (*.f64 lambda2 lambda2) (-.f64 lambda1 (-.f64 #s(literal 0 binary64) lambda2))))
(-.f64 (/.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))) (/.f64 (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2))))
(fma.f64 #s(literal -1 binary64) lambda2 lambda1)
(/.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (+.f64 (*.f64 lambda1 lambda1) (-.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 (-.f64 #s(literal 0 binary64) lambda2)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda1 lambda2) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda1 lambda2))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (-.f64 lambda1 (-.f64 #s(literal 0 binary64) lambda2)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 lambda1 lambda2) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2)))) (neg.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2)))) (neg.f64 (+.f64 (*.f64 lambda1 lambda1) (-.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 (-.f64 #s(literal 0 binary64) lambda2))))))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (neg.f64 (+.f64 lambda1 lambda2)))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (neg.f64 (-.f64 lambda1 (-.f64 #s(literal 0 binary64) lambda2))))
(/.f64 (-.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 8 binary64)) (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)) (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2))))) (+.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2))) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2))))))
(/.f64 (-.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (*.f64 lambda1 (*.f64 lambda1 lambda1))) (+.f64 (*.f64 lambda2 lambda2) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda2))))
(/.f64 (-.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2))
(/.f64 (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2))))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda1))) (neg.f64 (+.f64 lambda1 lambda2)))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (*.f64 lambda1 (*.f64 lambda1 lambda1)))) (neg.f64 (+.f64 (*.f64 lambda2 lambda2) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda2)))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))))) (neg.f64 (neg.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))) (neg.f64 (neg.f64 (+.f64 lambda1 lambda2))))
(/.f64 (neg.f64 (-.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 8 binary64)) (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)) (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))))) (neg.f64 (+.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2))) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2))))) (neg.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (pow.f64 (neg.f64 lambda1) #s(literal 3 binary64))) (+.f64 (*.f64 lambda2 lambda2) (-.f64 (*.f64 (neg.f64 lambda1) (neg.f64 lambda1)) (*.f64 lambda2 (neg.f64 lambda1)))))
(/.f64 (+.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 8 binary64)) (pow.f64 (neg.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 (*.f64 (neg.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2))) (neg.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))))))
(/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (*.f64 lambda1 (*.f64 lambda1 lambda1))) (+.f64 (*.f64 lambda2 lambda2) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (-.f64 #s(literal 0 binary64) lambda2) lambda1))))
(pow.f64 (/.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 lambda1 lambda2) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) #s(literal -1 binary64))
(*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (cos.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (sin.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))))
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)) (sin.f64 lambda1)))
(-.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(literal 0 binary64) (sin.f64 (-.f64 lambda1 lambda2))))
(-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (cos.f64 (+.f64 lambda1 lambda2))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (cos.f64 (+.f64 lambda1 lambda2))))
(-.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(-.f64 (*.f64 #s(literal 0 binary64) (cos.f64 (neg.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2))))) (*.f64 #s(literal 1 binary64) (sin.f64 (neg.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2))))))
(-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 (neg.f64 lambda1))) (*.f64 (sin.f64 lambda2) (sin.f64 (neg.f64 lambda1))))
(sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 #s(literal 0 binary64) (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (cos.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (cos.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (sin.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))))
(fma.f64 (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))))
(/.f64 (+.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))) (+.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))))))
(/.f64 (+.f64 (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))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))))) (+.f64 (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)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 lambda1 lambda2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))))))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (cos.f64 (+.f64 lambda1 lambda2)))
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))))) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))))) (+.f64 (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))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (cos.f64 (+.f64 lambda1 lambda2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))))))))
(/.f64 (+.f64 (*.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 (*.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 (neg.f64 (+.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)))) (neg.f64 (+.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))))))
(/.f64 (neg.f64 (+.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)))) (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))))))
(/.f64 (neg.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))) (neg.f64 (cos.f64 (+.f64 lambda1 lambda2))))
(/.f64 (neg.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))))) (neg.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(/.f64 (neg.f64 (+.f64 (*.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 (neg.f64 (+.f64 (*.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 (neg.f64 (neg.f64 (+.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))))) (neg.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))))))))
(/.f64 (neg.f64 (neg.f64 (+.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))))) (neg.f64 (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))))) (neg.f64 (neg.f64 (cos.f64 (+.f64 lambda1 lambda2)))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))))))) (neg.f64 (neg.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(literal 0 binary64) (sin.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
(pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))))) (+.f64 (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)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))) (+.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)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (cos.f64 (+.f64 lambda1 lambda2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))))) #s(literal -1 binary64))
(*.f64 (+.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))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))))))
(*.f64 (+.f64 (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))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))))))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda1 lambda2))))
(*.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(acos.f64 (cos.f64 (-.f64 lambda1 lambda2)))
(+.f64 lambda1 (-.f64 #s(literal 0 binary64) lambda2))
(+.f64 lambda2 (neg.f64 lambda1))
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2))))
(+.f64 (-.f64 #s(literal 0 binary64) lambda2) lambda1)
(fabs.f64 (remainder.f64 (-.f64 lambda1 lambda2) (*.f64 #s(literal 2 binary64) (PI.f64))))
(fabs.f64 (neg.f64 (remainder.f64 (-.f64 lambda1 lambda2) (*.f64 #s(literal 2 binary64) (PI.f64)))))
(fabs.f64 (neg.f64 (neg.f64 (remainder.f64 (-.f64 lambda1 lambda2) (*.f64 #s(literal 2 binary64) (PI.f64))))))
(-.f64 lambda1 lambda2)
(-.f64 lambda2 lambda1)
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))
(-.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)) (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))
(-.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)) (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))
(-.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (+.f64 (*.f64 lambda2 lambda2) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda2)))) (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (+.f64 (*.f64 lambda2 lambda2) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda2)))))
(-.f64 (/.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 8 binary64)) (+.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2))) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))))) (/.f64 (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)) (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))) (+.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2))) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))))))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (-.f64 #s(literal 0 binary64) lambda2))) (/.f64 (*.f64 lambda2 lambda2) (-.f64 lambda1 (-.f64 #s(literal 0 binary64) lambda2))))
(-.f64 (/.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))) (/.f64 (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2))))
(fma.f64 #s(literal -1 binary64) lambda2 lambda1)
(/.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (+.f64 (*.f64 lambda1 lambda1) (-.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 (-.f64 #s(literal 0 binary64) lambda2)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda1 lambda2) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda1 lambda2))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (-.f64 lambda1 (-.f64 #s(literal 0 binary64) lambda2)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 lambda1 lambda2) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2)))) (neg.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2)))) (neg.f64 (+.f64 (*.f64 lambda1 lambda1) (-.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 (-.f64 #s(literal 0 binary64) lambda2))))))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (neg.f64 (+.f64 lambda1 lambda2)))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (neg.f64 (-.f64 lambda1 (-.f64 #s(literal 0 binary64) lambda2))))
(/.f64 (-.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 8 binary64)) (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)) (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2))))) (+.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2))) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2))))))
(/.f64 (-.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (*.f64 lambda1 (*.f64 lambda1 lambda1))) (+.f64 (*.f64 lambda2 lambda2) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda2))))
(/.f64 (-.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2))
(/.f64 (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2))))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda1))) (neg.f64 (+.f64 lambda1 lambda2)))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (*.f64 lambda1 (*.f64 lambda1 lambda1)))) (neg.f64 (+.f64 (*.f64 lambda2 lambda2) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda2)))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))))) (neg.f64 (neg.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))) (neg.f64 (neg.f64 (+.f64 lambda1 lambda2))))
(/.f64 (neg.f64 (-.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 8 binary64)) (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)) (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))))) (neg.f64 (+.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2))) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2))))) (neg.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (pow.f64 (neg.f64 lambda1) #s(literal 3 binary64))) (+.f64 (*.f64 lambda2 lambda2) (-.f64 (*.f64 (neg.f64 lambda1) (neg.f64 lambda1)) (*.f64 lambda2 (neg.f64 lambda1)))))
(/.f64 (+.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 8 binary64)) (pow.f64 (neg.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 (*.f64 (neg.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2))) (neg.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))))))
(/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (*.f64 lambda1 (*.f64 lambda1 lambda1))) (+.f64 (*.f64 lambda2 lambda2) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (-.f64 #s(literal 0 binary64) lambda2) lambda1))))
(pow.f64 (/.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 lambda1 lambda2) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) #s(literal -1 binary64))
(*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))
(*.f64 R (-.f64 phi1 phi2))
(*.f64 (-.f64 phi1 phi2) R)
(acos.f64 (cos.f64 (-.f64 phi1 phi2)))
(+.f64 phi1 (-.f64 #s(literal 0 binary64) phi2))
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2))))
(+.f64 (-.f64 #s(literal 0 binary64) phi2) phi1)
(fabs.f64 (remainder.f64 (-.f64 phi1 phi2) (*.f64 #s(literal 2 binary64) (PI.f64))))
(fabs.f64 (neg.f64 (remainder.f64 (-.f64 phi1 phi2) (*.f64 #s(literal 2 binary64) (PI.f64)))))
(-.f64 phi1 phi2)
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2)))
(-.f64 (/.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2)))) (/.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2)))))
(-.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi1 phi2)) (/.f64 (*.f64 phi2 phi2) (+.f64 phi1 phi2)))
(-.f64 (/.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 8 binary64)) (+.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2))) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2)))))) (/.f64 (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2)) (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2)))) (+.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2))) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2)))))))
(-.f64 (/.f64 (*.f64 phi1 phi1) (-.f64 phi1 (-.f64 #s(literal 0 binary64) phi2))) (/.f64 (*.f64 phi2 phi2) (-.f64 phi1 (-.f64 #s(literal 0 binary64) phi2))))
(-.f64 (/.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2)))) (/.f64 (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2)))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2))))
(fma.f64 #s(literal -1 binary64) phi2 phi1)
(/.f64 (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2))))
(/.f64 (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))) (+.f64 (*.f64 phi1 phi1) (-.f64 (*.f64 phi2 phi2) (*.f64 phi1 (-.f64 #s(literal 0 binary64) phi2)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2))) (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 phi1 phi2) (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2))))
(/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (+.f64 phi1 phi2))
(/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 phi1 (-.f64 #s(literal 0 binary64) phi2)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2))) (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 phi1 phi2) (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)))))
(/.f64 (neg.f64 (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))) (neg.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2)))))
(/.f64 (neg.f64 (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))) (neg.f64 (+.f64 (*.f64 phi1 phi1) (-.f64 (*.f64 phi2 phi2) (*.f64 phi1 (-.f64 #s(literal 0 binary64) phi2))))))
(/.f64 (neg.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2))) (neg.f64 (+.f64 phi1 phi2)))
(/.f64 (neg.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2))) (neg.f64 (-.f64 phi1 (-.f64 #s(literal 0 binary64) phi2))))
(/.f64 (-.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 8 binary64)) (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2)) (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2))))) (+.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2))) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2))))))
(/.f64 (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)))) (neg.f64 (neg.f64 (+.f64 phi1 phi2))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))))) (neg.f64 (neg.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2))))))
(/.f64 (neg.f64 (-.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 8 binary64)) (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2)) (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2)))))) (neg.f64 (+.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2))) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2)))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2))))) (neg.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2)))))
(/.f64 (+.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 8 binary64)) (pow.f64 (neg.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 (*.f64 (neg.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2))) (neg.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2)))) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2)))))))
(/.f64 (+.f64 (*.f64 (*.f64 phi2 phi2) (-.f64 #s(literal 0 binary64) phi2)) (*.f64 phi1 (*.f64 phi1 phi1))) (+.f64 (*.f64 phi2 phi2) (-.f64 (*.f64 phi1 phi1) (*.f64 (-.f64 #s(literal 0 binary64) phi2) phi1))))
(pow.f64 (/.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2))) (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 phi1 phi2) (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2))) #s(literal -1 binary64))
(*.f64 (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2)))))
(*.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (/.f64 #s(literal 1 binary64) (+.f64 phi1 phi2)))
(*.f64 (/.f64 (+.f64 phi1 phi2) (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2))) (/.f64 (-.f64 phi1 phi2) (/.f64 #s(literal 1 binary64) (-.f64 phi1 phi2))))
(*.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (+.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (-.f64 phi2 phi1))))
(*.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2))) (-.f64 phi1 phi2))
(*.f64 (/.f64 (+.f64 phi1 phi2) (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)))) (/.f64 (-.f64 phi1 phi2) (+.f64 phi1 phi2)))
(*.f64 (/.f64 (+.f64 phi1 phi2) (+.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))) (/.f64 (-.f64 phi1 phi2) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (-.f64 phi2 phi1))))))
(*.f64 (/.f64 (+.f64 phi1 phi2) (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))))) (/.f64 (-.f64 phi1 phi2) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2)))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(+.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+.f64 (*.f64 #s(literal 0 binary64) (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2)))) (*.f64 #s(literal 1 binary64) (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2)))))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2))))) (cos.f64 (/.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2)))))) (*.f64 (sin.f64 (/.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2))))) (sin.f64 (/.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2)))))))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi1 phi2))) (cos.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi1 phi2)))) (*.f64 (sin.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi1 phi2)))))
(cos.f64 (-.f64 phi1 phi2))
(cos.f64 (-.f64 phi2 phi1))
(-.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 #s(literal 0 binary64) phi2))))
(-.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) (sin.f64 phi1)))
(-.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(-.f64 (*.f64 #s(literal 0 binary64) (cos.f64 (neg.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2))))) (*.f64 #s(literal 1 binary64) (sin.f64 (neg.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2))))))
(-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (cos.f64 (+.f64 phi1 phi2))))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(fma.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(fma.f64 #s(literal 0 binary64) (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2))) (*.f64 #s(literal 1 binary64) (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2)))))
(fma.f64 (cos.f64 (/.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2))))) (cos.f64 (/.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2))))) (*.f64 (sin.f64 (/.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2))))) (sin.f64 (/.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2)))))))
(fma.f64 (cos.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi1 phi2))) (cos.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi1 phi2))) (*.f64 (sin.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi1 phi2)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (+.f64 phi1 phi2)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (+.f64 phi1 phi2)))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))))))
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (+.f64 phi1 phi2)))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))))))
(/.f64 (+.f64 (*.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))) #s(literal 4 binary64))
(/.f64 (+.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))) #s(literal 4 binary64))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (+.f64 phi1 phi2))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))))) (neg.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))) (cos.f64 (+.f64 phi1 phi2)))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (+.f64 phi1 phi2)))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))))) (neg.f64 (neg.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(/.f64 (neg.f64 (+.f64 (*.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))))) #s(literal -4 binary64))
(/.f64 (neg.f64 (+.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))))) #s(literal -4 binary64))
(/.f64 (neg.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))))) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 phi1 phi2))))
(pow.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (+.f64 phi1 phi2)))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))))) #s(literal -1 binary64))
(*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+.f64 (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)))
(+.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (+.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))))
(-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(-.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(-.f64 (/.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 8 binary64)) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))) (/.f64 (pow.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 3 binary64)) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(-.f64 (/.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) #s(literal 4 binary64)) (+.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 (pow.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 (/.f64 (*.f64 (cos.f64 (-.f64 phi1 phi2)) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))) (/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 8 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64)))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(-.f64 (/.f64 (*.f64 (cos.f64 (-.f64 phi1 phi2)) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 phi1 phi2))) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))) (/.f64 (*.f64 #s(literal -2 binary64) (-.f64 (/.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 8 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64)))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(-.f64 (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 phi1 phi2))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 (*.f64 #s(literal -2 binary64) (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 (/.f64 (*.f64 #s(literal 1 binary64) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (*.f64 (/.f64 #s(literal 2 binary64) (cos.f64 (-.f64 phi1 phi2))) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))) (/.f64 (*.f64 (/.f64 #s(literal 2 binary64) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 8 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64)))) (*.f64 (/.f64 #s(literal 2 binary64) (cos.f64 (-.f64 phi1 phi2))) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(-.f64 (/.f64 (*.f64 #s(literal 1 binary64) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (*.f64 (/.f64 #s(literal 2 binary64) (cos.f64 (-.f64 phi1 phi2))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 (*.f64 (/.f64 #s(literal 2 binary64) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))))) (*.f64 (/.f64 #s(literal 2 binary64) (cos.f64 (-.f64 phi1 phi2))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 (/.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(-.f64 (/.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) #s(literal 4 binary64)) (-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (/.f64 (pow.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(fma.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (+.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (+.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (+.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (+.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (+.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64) (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(fma.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (/.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(fma.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal -1/2 binary64) (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(fma.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(fma.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 #s(literal -1 binary64) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (+.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2) (+.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (+.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (+.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (+.f64 phi1 phi2))))) (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(fma.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(fma.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (+.f64 phi1 phi2)))) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi1 phi2)) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (+.f64 phi1 phi2))))) (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 8 binary64)) (pow.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 3 binary64))) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 8 binary64)) (pow.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 3 binary64))) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) #s(literal 4 binary64)) (-.f64 (pow.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (*.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 8 binary64)) (pow.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(/.f64 (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))) (+.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/.f64 (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))) (-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 8 binary64)) (pow.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))))))
(/.f64 (-.f64 (*.f64 (cos.f64 (-.f64 phi1 phi2)) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 8 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(/.f64 (-.f64 (*.f64 (cos.f64 (-.f64 phi1 phi2)) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 phi1 phi2))) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (*.f64 #s(literal -2 binary64) (-.f64 (/.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 8 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 phi1 phi2))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (*.f64 #s(literal -2 binary64) (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))))))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (*.f64 (/.f64 #s(literal 2 binary64) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 8 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))))) (*.f64 (/.f64 #s(literal 2 binary64) (cos.f64 (-.f64 phi1 phi2))) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (*.f64 (/.f64 #s(literal 2 binary64) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))))))) (*.f64 (/.f64 #s(literal 2 binary64) (cos.f64 (-.f64 phi1 phi2))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))))) (neg.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/.f64 (neg.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 8 binary64)) (pow.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(/.f64 (neg.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 8 binary64)) (pow.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) #s(literal 4 binary64)) (-.f64 (pow.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (*.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))))
(/.f64 (neg.f64 (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)))) (neg.f64 (+.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(/.f64 (neg.f64 (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(/.f64 (-.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 phi1)) (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 (*.f64 (cos.f64 (-.f64 phi1 phi2)) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 8 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64)))))) (neg.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (cos.f64 (-.f64 phi1 phi2)) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))))))) (neg.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 phi1 phi2))) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (*.f64 #s(literal -2 binary64) (-.f64 (/.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 8 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64)))))) (neg.f64 (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 phi1 phi2))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (*.f64 #s(literal -2 binary64) (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))))))) (neg.f64 (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1 binary64) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (*.f64 (/.f64 #s(literal 2 binary64) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 8 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64)))))) (neg.f64 (*.f64 (/.f64 #s(literal 2 binary64) (cos.f64 (-.f64 phi1 phi2))) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1 binary64) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (*.f64 (/.f64 #s(literal 2 binary64) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))))))) (neg.f64 (*.f64 (/.f64 #s(literal 2 binary64) (cos.f64 (-.f64 phi1 phi2))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))))))) (neg.f64 (neg.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 8 binary64)) (pow.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (+.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))))) (neg.f64 (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(/.f64 (+.f64 (neg.f64 (pow.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 3 binary64))) (/.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 8 binary64))) (+.f64 (pow.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (+.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (+.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))))
(/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 3 binary64))) (+.f64 (*.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))))
(pow.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 8 binary64)) (pow.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))))
(*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 8 binary64)) (pow.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(*.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(*.f64 (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(-.f64 (/.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 8 binary64)) (+.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (/.f64 (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 3 binary64)) (+.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))))
(-.f64 (/.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (/.f64 (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(/.f64 (-.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 8 binary64)) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(/.f64 (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(/.f64 (neg.f64 (-.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 8 binary64)) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)))) (neg.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(/.f64 (+.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 8 binary64)) (pow.f64 (neg.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 (*.f64 (neg.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (neg.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (cos.f64 (-.f64 phi1 phi2)))) #s(literal -1 binary64)))
(-.f64 #s(literal 0 binary64) (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal -2 binary64)))
(-.f64 (/.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (/.f64 (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 #s(literal 0 binary64) phi2))) #s(literal 2 binary64)))
(-.f64 (/.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)) (/.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)))
(-.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(neg.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal -2 binary64)))
(/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal -2 binary64))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (+.f64 phi1 phi2))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (cos.f64 (-.f64 phi1 phi2))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 #s(literal 2 binary64) (cos.f64 (-.f64 phi1 phi2))))))
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))) (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 2 binary64) (cos.f64 (-.f64 phi1 phi2)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 #s(literal 2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)))) (neg.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (+.f64 phi1 phi2)))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))))) (neg.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64))) #s(literal 1/2 binary64)) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (+.f64 phi1 phi2)))))
(/.f64 (*.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))) #s(literal 1/2 binary64)) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(/.f64 (neg.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 phi1 phi2))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64))) #s(literal 1/2 binary64))) (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (+.f64 phi1 phi2))))))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))) #s(literal 1/2 binary64))) (neg.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(pow.f64 (/.f64 #s(literal 2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 #s(literal 2 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64))
(*.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (/.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal -1/2 binary64))
(*.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)))
(*.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (+.f64 phi1 phi2))))))
(*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(*.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (+.f64 phi1 phi2)))) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi1 phi2)) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (+.f64 phi1 phi2))))))
(+.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 #s(literal 0 binary64) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (cos.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (sin.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))))
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)) (sin.f64 lambda1)))
(-.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(literal 0 binary64) (sin.f64 (-.f64 lambda1 lambda2))))
(-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (cos.f64 (+.f64 lambda1 lambda2))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (cos.f64 (+.f64 lambda1 lambda2))))
(-.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(-.f64 (*.f64 #s(literal 0 binary64) (cos.f64 (neg.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2))))) (*.f64 #s(literal 1 binary64) (sin.f64 (neg.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2))))))
(-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 (neg.f64 lambda1))) (*.f64 (sin.f64 lambda2) (sin.f64 (neg.f64 lambda1))))
(sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 #s(literal 0 binary64) (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (cos.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (cos.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (sin.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))))
(fma.f64 (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))))
(/.f64 (+.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))) (+.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))))))
(/.f64 (+.f64 (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))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))))) (+.f64 (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)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 lambda1 lambda2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))))))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (cos.f64 (+.f64 lambda1 lambda2)))
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))))) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))))) (+.f64 (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))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (cos.f64 (+.f64 lambda1 lambda2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))))))))
(/.f64 (+.f64 (*.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 (*.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 (neg.f64 (+.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)))) (neg.f64 (+.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))))))
(/.f64 (neg.f64 (+.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)))) (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))))))
(/.f64 (neg.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))) (neg.f64 (cos.f64 (+.f64 lambda1 lambda2))))
(/.f64 (neg.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))))) (neg.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(/.f64 (neg.f64 (+.f64 (*.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 (neg.f64 (+.f64 (*.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 (neg.f64 (neg.f64 (+.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))))) (neg.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))))))))
(/.f64 (neg.f64 (neg.f64 (+.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))))) (neg.f64 (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))))) (neg.f64 (neg.f64 (cos.f64 (+.f64 lambda1 lambda2)))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))))))) (neg.f64 (neg.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(literal 0 binary64) (sin.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))
(pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))))) (+.f64 (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)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))) (+.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)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (cos.f64 (+.f64 lambda1 lambda2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))))) #s(literal -1 binary64))
(*.f64 (+.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))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))))))
(*.f64 (+.f64 (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))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))))))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda1 lambda2))))
(*.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(-.f64 (/.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 8 binary64)) (+.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (/.f64 (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 3 binary64)) (+.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))))
(-.f64 (/.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (/.f64 (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(/.f64 (-.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 8 binary64)) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(/.f64 (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(/.f64 (neg.f64 (-.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 8 binary64)) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)))) (neg.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(/.f64 (+.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 8 binary64)) (pow.f64 (neg.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 (*.f64 (neg.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (neg.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+.f64 (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)))
(+.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (+.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))))
(-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(-.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(-.f64 (/.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 8 binary64)) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))) (/.f64 (pow.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 3 binary64)) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(-.f64 (/.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) #s(literal 4 binary64)) (+.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 (pow.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 (/.f64 (*.f64 (cos.f64 (-.f64 phi1 phi2)) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))) (/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 8 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64)))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(-.f64 (/.f64 (*.f64 (cos.f64 (-.f64 phi1 phi2)) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 phi1 phi2))) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))) (/.f64 (*.f64 #s(literal -2 binary64) (-.f64 (/.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 8 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64)))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(-.f64 (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 phi1 phi2))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 (*.f64 #s(literal -2 binary64) (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 (/.f64 (*.f64 #s(literal 1 binary64) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (*.f64 (/.f64 #s(literal 2 binary64) (cos.f64 (-.f64 phi1 phi2))) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))) (/.f64 (*.f64 (/.f64 #s(literal 2 binary64) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 8 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64)))) (*.f64 (/.f64 #s(literal 2 binary64) (cos.f64 (-.f64 phi1 phi2))) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(-.f64 (/.f64 (*.f64 #s(literal 1 binary64) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (*.f64 (/.f64 #s(literal 2 binary64) (cos.f64 (-.f64 phi1 phi2))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 (*.f64 (/.f64 #s(literal 2 binary64) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))))) (*.f64 (/.f64 #s(literal 2 binary64) (cos.f64 (-.f64 phi1 phi2))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 (/.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(-.f64 (/.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) #s(literal 4 binary64)) (-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (/.f64 (pow.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(fma.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (+.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (+.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (+.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (+.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (+.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 1/2 binary64) (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(fma.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (/.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(fma.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal -1/2 binary64) (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(fma.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi1 phi2)) (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(fma.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (-.f64 phi1 phi2))) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 #s(literal -1 binary64) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (+.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2) (+.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (+.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (+.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (+.f64 phi1 phi2))))) (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(fma.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(fma.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (+.f64 phi1 phi2)))) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi1 phi2)) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (+.f64 phi1 phi2))))) (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 8 binary64)) (pow.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 3 binary64))) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 8 binary64)) (pow.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 3 binary64))) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) #s(literal 4 binary64)) (-.f64 (pow.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (*.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 8 binary64)) (pow.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(/.f64 (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))) (+.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/.f64 (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))) (-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 8 binary64)) (pow.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))))))
(/.f64 (-.f64 (*.f64 (cos.f64 (-.f64 phi1 phi2)) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 8 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(/.f64 (-.f64 (*.f64 (cos.f64 (-.f64 phi1 phi2)) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))))))) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 phi1 phi2))) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (*.f64 #s(literal -2 binary64) (-.f64 (/.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 8 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 phi1 phi2))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (*.f64 #s(literal -2 binary64) (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))))))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (*.f64 (/.f64 #s(literal 2 binary64) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 8 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))))) (*.f64 (/.f64 #s(literal 2 binary64) (cos.f64 (-.f64 phi1 phi2))) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (*.f64 (/.f64 #s(literal 2 binary64) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))))))) (*.f64 (/.f64 #s(literal 2 binary64) (cos.f64 (-.f64 phi1 phi2))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))))) (neg.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/.f64 (neg.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 8 binary64)) (pow.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(/.f64 (neg.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 8 binary64)) (pow.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) #s(literal 4 binary64)) (-.f64 (pow.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (*.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))))
(/.f64 (neg.f64 (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)))) (neg.f64 (+.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(/.f64 (neg.f64 (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(/.f64 (-.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 phi1)) (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 (*.f64 (cos.f64 (-.f64 phi1 phi2)) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 8 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64)))))) (neg.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (cos.f64 (-.f64 phi1 phi2)) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))))))) (neg.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 phi1 phi2))) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (*.f64 #s(literal -2 binary64) (-.f64 (/.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 8 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64)))))) (neg.f64 (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 phi1 phi2))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (*.f64 #s(literal -2 binary64) (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))))))) (neg.f64 (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1 binary64) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (*.f64 (/.f64 #s(literal 2 binary64) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 8 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64)))))) (neg.f64 (*.f64 (/.f64 #s(literal 2 binary64) (cos.f64 (-.f64 phi1 phi2))) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1 binary64) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (*.f64 (/.f64 #s(literal 2 binary64) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))))))) (neg.f64 (*.f64 (/.f64 #s(literal 2 binary64) (cos.f64 (-.f64 phi1 phi2))) (+.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))))))) (neg.f64 (neg.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 8 binary64)) (pow.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (+.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))))) (neg.f64 (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(/.f64 (+.f64 (neg.f64 (pow.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 3 binary64))) (/.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 8 binary64))) (+.f64 (pow.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (+.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (+.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))))
(/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 3 binary64))) (+.f64 (*.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))))
(pow.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)))))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 8 binary64)) (pow.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))))
(*.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) #s(literal 8 binary64)) (pow.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) #s(literal 4 binary64)) (*.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(*.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(*.f64 (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))) #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(+.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(+.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(-.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (/.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) (+.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)))) (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))))))
(/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) (+.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)))) (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))))))
(/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda1 lambda2))))
(/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))))) (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(/.f64 (*.f64 (+.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))) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) (*.f64 (+.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))))) #s(literal 2 binary64)))
(/.f64 (*.f64 (+.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))) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) (*.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 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 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(/.f64 (*.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))))) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) (*.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64))) (-.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(/.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.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)))) (+.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))))))
(/.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.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)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))))
(/.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))) (cos.f64 (+.f64 lambda1 lambda2)))
(/.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))))) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) #s(literal 2 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))
(/.f64 (*.f64 (+.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))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (+.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))))))
(/.f64 (*.f64 (+.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))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))))
(/.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 (+.f64 lambda1 lambda2)))
(/.f64 (*.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2)))) (cos.f64 phi1)) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) (+.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))))) (neg.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))))))))
(/.f64 (neg.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) (+.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))))) (neg.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))))))
(/.f64 (neg.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))))) (neg.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda1 lambda2)))))
(/.f64 (neg.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))))))) (neg.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
(/.f64 (neg.f64 (*.f64 (+.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))) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))) (neg.f64 (*.f64 (+.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))))) #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (+.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))) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))) (neg.f64 (*.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))) (neg.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))))) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))) (neg.f64 (*.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(/.f64 (neg.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2)))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.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))))) (neg.f64 (+.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))))))
(/.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.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))))) (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))))))
(/.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))))) (neg.f64 (cos.f64 (+.f64 lambda1 lambda2))))
(/.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))))))) (neg.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(/.f64 (neg.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (+.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))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (neg.f64 (+.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))))))
(/.f64 (neg.f64 (*.f64 (+.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))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))))))
(/.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (neg.f64 (cos.f64 (+.f64 lambda1 lambda2))))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (neg.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(/.f64 (neg.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2)))) (cos.f64 phi1))) #s(literal -2 binary64))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi1))
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2))
(+.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (neg.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))
(+.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) (sin.f64 phi1)))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 phi1 phi1) (-.f64 phi1 phi2))) (cos.f64 (/.f64 (*.f64 phi2 phi2) (-.f64 phi1 phi2)))) (*.f64 (sin.f64 (/.f64 (*.f64 phi1 phi1) (-.f64 phi1 phi2))) (sin.f64 (/.f64 (*.f64 phi2 phi2) (-.f64 phi1 phi2)))))
(cos.f64 (+.f64 phi1 phi2))
(-.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(-.f64 (/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 2 binary64)) #s(literal 4 binary64)) (/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) #s(literal 4 binary64)))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) (/.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))))
(-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (cos.f64 (-.f64 phi1 phi2))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (cos.f64 (-.f64 phi1 phi2))))
(fma.f64 (cos.f64 phi1) (cos.f64 phi2) (neg.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi2) (cos.f64 phi1) (neg.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) (sin.f64 phi1)))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (neg.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) (sin.f64 phi1)))
(fma.f64 (cos.f64 (/.f64 (*.f64 phi1 phi1) (-.f64 phi1 phi2))) (cos.f64 (/.f64 (*.f64 phi2 phi2) (-.f64 phi1 phi2))) (*.f64 (sin.f64 (/.f64 (*.f64 phi1 phi1) (-.f64 phi1 phi2))) (sin.f64 (/.f64 (*.f64 phi2 phi2) (-.f64 phi1 phi2)))))
(/.f64 (-.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))) #s(literal 4 binary64))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))) (cos.f64 (-.f64 phi1 phi2)))
(/.f64 (-.f64 (neg.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) (-.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 phi1 phi2))))) #s(literal -2 binary64))
(/.f64 (-.f64 (neg.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))))) (-.f64 #s(literal 0 binary64) (cos.f64 (-.f64 phi1 phi2))))
(/.f64 (neg.f64 (-.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))))) #s(literal -4 binary64))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 3 binary64))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (-.f64 (*.f64 (neg.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (neg.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (neg.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (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 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (-.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) (sin.f64 phi1)) #s(literal 3 binary64))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (-.f64 (*.f64 (*.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) (sin.f64 phi1)) (*.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) (sin.f64 phi1))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) (sin.f64 phi1))))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(+.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+.f64 (*.f64 #s(literal 0 binary64) (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2)))) (*.f64 #s(literal 1 binary64) (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2)))))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2))))) (cos.f64 (/.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2)))))) (*.f64 (sin.f64 (/.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2))))) (sin.f64 (/.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2)))))))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi1 phi2))) (cos.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi1 phi2)))) (*.f64 (sin.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi1 phi2)))))
(cos.f64 (-.f64 phi1 phi2))
(cos.f64 (-.f64 phi2 phi1))
(-.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 #s(literal 0 binary64) phi2))))
(-.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (-.f64 #s(literal 0 binary64) phi2)) (sin.f64 phi1)))
(-.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(-.f64 (*.f64 #s(literal 0 binary64) (cos.f64 (neg.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2))))) (*.f64 #s(literal 1 binary64) (sin.f64 (neg.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2))))))
(-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (cos.f64 (+.f64 phi1 phi2))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (cos.f64 (+.f64 phi1 phi2))))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(fma.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(fma.f64 #s(literal 0 binary64) (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2))) (*.f64 #s(literal 1 binary64) (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2)))))
(fma.f64 (cos.f64 (/.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2))))) (cos.f64 (/.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2))))) (*.f64 (sin.f64 (/.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2))))) (sin.f64 (/.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2)))))))
(fma.f64 (cos.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi1 phi2))) (cos.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi1 phi2))) (*.f64 (sin.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi1 phi2)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (+.f64 phi1 phi2)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (+.f64 phi1 phi2)))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))))))
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (+.f64 phi1 phi2)))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))))))
(/.f64 (+.f64 (*.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))) #s(literal 4 binary64))
(/.f64 (+.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))) #s(literal 4 binary64))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (+.f64 phi1 phi2))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))))) (neg.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))) (cos.f64 (+.f64 phi1 phi2)))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (+.f64 phi1 phi2)))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))))) (neg.f64 (neg.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(/.f64 (neg.f64 (+.f64 (*.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))))) #s(literal -4 binary64))
(/.f64 (neg.f64 (+.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))))) #s(literal -4 binary64))
(/.f64 (neg.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))))) (-.f64 #s(literal 0 binary64) (cos.f64 (+.f64 phi1 phi2))))
(pow.f64 (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (+.f64 phi1 phi2)))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))))) #s(literal -1 binary64))
(*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (+.f64 phi1 phi2))))))
(*.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(+.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(+.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(-.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (/.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) (+.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)))) (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))))))
(/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) (+.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)))) (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))))))
(/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda1 lambda2))))
(/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))))) (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(/.f64 (*.f64 (+.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))) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) (*.f64 (+.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))))) #s(literal 2 binary64)))
(/.f64 (*.f64 (+.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))) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) (*.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 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 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(/.f64 (*.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))))) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) (*.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64))) (-.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(/.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.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)))) (+.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))))))
(/.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.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)))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))))
(/.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))) (cos.f64 (+.f64 lambda1 lambda2)))
(/.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))))) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) #s(literal 2 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))
(/.f64 (*.f64 (+.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))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (+.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))))))
(/.f64 (*.f64 (+.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))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))))
(/.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 (+.f64 lambda1 lambda2)))
(/.f64 (*.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2)))) (cos.f64 phi1)) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) (+.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))))) (neg.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))))))))
(/.f64 (neg.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) (+.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))))) (neg.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))))))
(/.f64 (neg.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))))) (neg.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda1 lambda2)))))
(/.f64 (neg.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))))))) (neg.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
(/.f64 (neg.f64 (*.f64 (+.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))) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))) (neg.f64 (*.f64 (+.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))))) #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (+.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))) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))) (neg.f64 (*.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))) (neg.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))))) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))) (neg.f64 (*.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(/.f64 (neg.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2)))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.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))))) (neg.f64 (+.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))))))
(/.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.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))))) (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))))))
(/.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))))) (neg.f64 (cos.f64 (+.f64 lambda1 lambda2))))
(/.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))))))) (neg.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(/.f64 (neg.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (+.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))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (neg.f64 (+.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))))))
(/.f64 (neg.f64 (*.f64 (+.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))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))))))
(/.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (neg.f64 (cos.f64 (+.f64 lambda1 lambda2))))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (neg.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(/.f64 (neg.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2)))) (cos.f64 phi1))) #s(literal -2 binary64))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi1))
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2))

simplify495.0ms (2%)

Memory
16.3MiB live, 720.4MiB allocated
Algorithm
1×egg-herbie
Rules
11 474×accelerator-lowering-fma.f32
11 474×accelerator-lowering-fma.f64
6 810×*-lowering-*.f32
6 810×*-lowering-*.f64
3 336×+-lowering-+.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
051217007
1166116597
2504016554
0831115284
Stop Event
1×iter limit
1×node limit
Counts
876 → 876
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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ (* phi1 (sin phi2)) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (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)))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (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))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin 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 phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(* 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))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* 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))))))))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* (sin phi1) (sin phi2))
(* -1 (* R lambda2))
(+ (* -1 (* R lambda2)) (* R lambda1))
(+ (* -1 (* R lambda2)) (* R lambda1))
(+ (* -1 (* R lambda2)) (* R lambda1))
(* R lambda1)
(* lambda1 (+ R (* -1 (/ (* R lambda2) lambda1))))
(* lambda1 (+ R (* -1 (/ (* R lambda2) lambda1))))
(* lambda1 (+ R (* -1 (/ (* R lambda2) lambda1))))
(* R lambda1)
(* -1 (* lambda1 (+ (* -1 R) (/ (* R lambda2) lambda1))))
(* -1 (* lambda1 (+ (* -1 R) (/ (* R lambda2) lambda1))))
(* -1 (* lambda1 (+ (* -1 R) (/ (* R lambda2) lambda1))))
(* R lambda1)
(+ (* -1 (* R lambda2)) (* R lambda1))
(+ (* -1 (* R lambda2)) (* R lambda1))
(+ (* -1 (* R lambda2)) (* R lambda1))
(* -1 (* R lambda2))
(* lambda2 (+ (* -1 R) (/ (* R lambda1) lambda2)))
(* lambda2 (+ (* -1 R) (/ (* R lambda1) lambda2)))
(* lambda2 (+ (* -1 R) (/ (* R lambda1) lambda2)))
(* -1 (* R lambda2))
(* -1 (* lambda2 (+ R (* -1 (/ (* R lambda1) lambda2)))))
(* -1 (* lambda2 (+ R (* -1 (/ (* R lambda1) lambda2)))))
(* -1 (* lambda2 (+ R (* -1 (/ (* R lambda1) lambda2)))))
(* R (- lambda1 lambda2))
(* R (- lambda1 lambda2))
(* R (- lambda1 lambda2))
(* R (- lambda1 lambda2))
(* R (- lambda1 lambda2))
(* R (- lambda1 lambda2))
(* R (- lambda1 lambda2))
(* R (- lambda1 lambda2))
(* R (- lambda1 lambda2))
(* R (- lambda1 lambda2))
(* R (- lambda1 lambda2))
(* R (- lambda1 lambda2))
(* -1 lambda2)
(- lambda1 lambda2)
(- lambda1 lambda2)
(- lambda1 lambda2)
lambda1
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
lambda1
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
lambda1
(+ lambda1 (* -1 lambda2))
(+ lambda1 (* -1 lambda2))
(+ lambda1 (* -1 lambda2))
(* -1 lambda2)
(* lambda2 (- (/ lambda1 lambda2) 1))
(* lambda2 (- (/ lambda1 lambda2) 1))
(* lambda2 (- (/ lambda1 lambda2) 1))
(* -1 lambda2)
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(cos (neg lambda2))
(+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))
(+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))
(+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(* -1 lambda2)
(- lambda1 lambda2)
(- lambda1 lambda2)
(- lambda1 lambda2)
lambda1
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
lambda1
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
lambda1
(+ lambda1 (* -1 lambda2))
(+ lambda1 (* -1 lambda2))
(+ lambda1 (* -1 lambda2))
(* -1 lambda2)
(* lambda2 (- (/ lambda1 lambda2) 1))
(* lambda2 (- (/ lambda1 lambda2) 1))
(* lambda2 (- (/ lambda1 lambda2) 1))
(* -1 lambda2)
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))
(acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))
(cos phi2)
(+ (cos phi2) (* phi1 (sin phi2)))
(+ (cos phi2) (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (cos phi2))))))
(+ (cos phi2) (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (cos phi2)) (* -1/6 (* phi1 (sin phi2))))))))
(+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))
(cos phi1)
(+ (cos phi1) (* phi2 (sin phi1)))
(+ (cos phi1) (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (cos phi1))))))
(+ (cos phi1) (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (cos phi1)) (* -1/6 (* phi2 (sin phi1))))))))
(+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))
(- (+ (* 1/2 (cos (neg phi2))) (* (cos phi2) (cos (- lambda1 lambda2)))) (* 1/2 (cos phi2)))
(- (+ (* 1/2 (cos (neg phi2))) (+ (* phi1 (- (* -1/2 (sin (neg phi2))) (* -1/2 (sin phi2)))) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos phi2)))
(- (+ (* 1/2 (cos (neg phi2))) (+ (* phi1 (- (+ (* -1/2 (sin (neg phi2))) (* phi1 (- (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/4 (cos (neg phi2)))) (* -1/4 (cos phi2))))) (* -1/2 (sin phi2)))) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos phi2)))
(- (+ (* 1/2 (cos (neg phi2))) (+ (* phi1 (- (+ (* -1/2 (sin (neg phi2))) (* phi1 (- (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* -1/4 (cos (neg phi2))) (* phi1 (- (* 1/12 (sin (neg phi2))) (* 1/12 (sin phi2)))))) (* -1/4 (cos phi2))))) (* -1/2 (sin phi2)))) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos phi2)))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))
(- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))
(- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))
(- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))
(* (cos phi1) (cos (- lambda1 lambda2)))
(+ (* phi2 (- (* 1/2 (sin phi1)) (* -1/2 (sin phi1)))) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* phi2 (- (+ (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (sin phi1))) (* -1/2 (sin phi1)))) (* (cos phi1) (cos (- lambda1 lambda2))))
(+ (* phi2 (- (+ (* 1/2 (sin phi1)) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* phi2 (- (* -1/12 (sin phi1)) (* 1/12 (sin phi1))))))) (* -1/2 (sin phi1)))) (* (cos phi1) (cos (- lambda1 lambda2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))
(- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))
(- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))
(- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))))
(* R (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))))
(* R (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))))
(* R (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1))))))
(acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1))))))
(acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1))))))
(acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2))))))
(acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2))))))
(acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2))))))
(acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(* 1/2 (cos (neg phi2)))
(+ (* -1/2 (* phi1 (sin (neg phi2)))) (* 1/2 (cos (neg phi2))))
(+ (* 1/2 (cos (neg phi2))) (* phi1 (+ (* -1/2 (sin (neg phi2))) (* -1/4 (* phi1 (cos (neg phi2)))))))
(+ (* 1/2 (cos (neg phi2))) (* phi1 (+ (* -1/2 (sin (neg phi2))) (* phi1 (+ (* -1/4 (cos (neg phi2))) (* 1/12 (* phi1 (sin (neg phi2)))))))))
(* 1/2 (cos (- phi1 phi2)))
(* 1/2 (cos (- phi1 phi2)))
(* 1/2 (cos (- phi1 phi2)))
(* 1/2 (cos (- phi1 phi2)))
(* 1/2 (cos (neg (+ phi2 (* -1 phi1)))))
(* 1/2 (cos (neg (+ phi2 (* -1 phi1)))))
(* 1/2 (cos (neg (+ phi2 (* -1 phi1)))))
(* 1/2 (cos (neg (+ phi2 (* -1 phi1)))))
(* 1/2 (cos phi1))
(+ (* 1/2 (cos phi1)) (* 1/2 (* phi2 (sin phi1))))
(+ (* 1/2 (cos phi1)) (* phi2 (+ (* -1/4 (* phi2 (cos phi1))) (* 1/2 (sin phi1)))))
(+ (* 1/2 (cos phi1)) (* phi2 (+ (* 1/2 (sin phi1)) (* phi2 (+ (* -1/4 (cos phi1)) (* -1/12 (* phi2 (sin phi1))))))))
(* 1/2 (cos (- phi1 phi2)))
(* 1/2 (cos (- phi1 phi2)))
(* 1/2 (cos (- phi1 phi2)))
(* 1/2 (cos (- phi1 phi2)))
(* 1/2 (cos (+ phi1 (* -1 phi2))))
(* 1/2 (cos (+ phi1 (* -1 phi2))))
(* 1/2 (cos (+ phi1 (* -1 phi2))))
(* 1/2 (cos (+ phi1 (* -1 phi2))))
(cos lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(+ (cos lambda1) (* lambda2 (+ (sin lambda1) (* -1/2 (* lambda2 (cos lambda1))))))
(+ (cos lambda1) (* lambda2 (+ (sin lambda1) (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))))))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(cos lambda2)
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))
(+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))))))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(* 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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (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) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ (* phi1 (sin phi2)) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (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)))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin 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 phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (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))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (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 phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos 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 phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin 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))))))))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin 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))))))))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(cos phi2)
(+ (cos phi2) (* -1 (* phi1 (sin phi2))))
(+ (cos phi2) (* phi1 (- (* -1/2 (* phi1 (cos phi2))) (sin phi2))))
(+ (cos phi2) (* phi1 (- (* phi1 (+ (* -1/2 (cos phi2)) (* 1/6 (* phi1 (sin phi2))))) (sin phi2))))
(cos (+ phi1 phi2))
(cos (+ phi1 phi2))
(cos (+ phi1 phi2))
(cos (+ phi1 phi2))
(cos (- phi2 (* -1 phi1)))
(cos (- phi2 (* -1 phi1)))
(cos (- phi2 (* -1 phi1)))
(cos (- phi2 (* -1 phi1)))
(cos phi1)
(+ (cos phi1) (* -1 (* phi2 (sin phi1))))
(+ (cos phi1) (* phi2 (- (* -1/2 (* phi2 (cos phi1))) (sin phi1))))
(+ (cos phi1) (* phi2 (- (* phi2 (+ (* -1/2 (cos phi1)) (* 1/6 (* phi2 (sin phi1))))) (sin phi1))))
(cos (+ phi1 phi2))
(cos (+ phi1 phi2))
(cos (+ phi1 phi2))
(cos (+ phi1 phi2))
(cos (- phi1 (* -1 phi2)))
(cos (- phi1 (* -1 phi2)))
(cos (- phi1 (* -1 phi2)))
(cos (- phi1 (* -1 phi2)))
(cos (neg phi2))
(+ (cos (neg phi2)) (* -1 (* phi1 (sin (neg phi2)))))
(+ (cos (neg phi2)) (* phi1 (- (* -1/2 (* phi1 (cos (neg phi2)))) (sin (neg phi2)))))
(+ (cos (neg phi2)) (* phi1 (- (* phi1 (+ (* -1/2 (cos (neg phi2))) (* 1/6 (* phi1 (sin (neg phi2)))))) (sin (neg phi2)))))
(cos (- phi1 phi2))
(cos (- phi1 phi2))
(cos (- phi1 phi2))
(cos (- phi1 phi2))
(cos (neg (+ phi2 (* -1 phi1))))
(cos (neg (+ phi2 (* -1 phi1))))
(cos (neg (+ phi2 (* -1 phi1))))
(cos (neg (+ phi2 (* -1 phi1))))
(cos phi1)
(+ (cos phi1) (* phi2 (sin phi1)))
(+ (cos phi1) (* phi2 (- (* -1/2 (* phi2 (cos phi1))) (* -1 (sin phi1)))))
(+ (cos phi1) (* phi2 (- (* phi2 (+ (* -1/2 (cos phi1)) (* -1/6 (* phi2 (sin phi1))))) (* -1 (sin phi1)))))
(cos (- phi1 phi2))
(cos (- phi1 phi2))
(cos (- phi1 phi2))
(cos (- phi1 phi2))
(cos (+ phi1 (* -1 phi2)))
(cos (+ phi1 (* -1 phi2)))
(cos (+ phi1 (* -1 phi2)))
(cos (+ phi1 (* -1 phi2)))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin 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))))))))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin 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))))))))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos 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 phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos lambda2) (* (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 phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
Outputs
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(*.f64 (cos.f64 phi2) (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(+ (* phi1 (sin phi2)) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+.f64 (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 phi1 (sin.f64 phi2)))
(+ (* 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)))))
(+.f64 (*.f64 phi1 (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 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)))))
(+.f64 (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 phi1 (+.f64 (*.f64 (*.f64 phi1 (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))) (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1)) #s(literal 1 binary64)) (sin.f64 phi2)))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(*.f64 (cos.f64 phi1) (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(+ (* phi2 (sin phi1)) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+.f64 (*.f64 (cos.f64 phi1) (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 phi2 (sin.f64 phi1)))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+.f64 (*.f64 phi2 (sin.f64 phi1)) (*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 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)))))
(+.f64 (*.f64 (cos.f64 phi1) (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 phi2 (+.f64 (*.f64 phi2 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) #s(literal -1/2 binary64)))) (*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 phi2 phi2)) #s(literal 1 binary64)) (sin.f64 phi1)))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 lambda1 (sin.f64 lambda2))) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 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))))
(+.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 lambda1 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2))) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 lambda1 #s(literal -1/2 binary64))))))
(+ (* 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))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (+.f64 (*.f64 lambda1 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2))) (*.f64 lambda1 (+.f64 (*.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 phi1) lambda1)) (*.f64 (cos.f64 phi2) (sin.f64 lambda2))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (+.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 lambda2 (sin.f64 lambda1)))))
(+ (* 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))))
(+.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 lambda2 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 lambda2 #s(literal -1/2 binary64))))))
(+ (* 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))))
(+.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (+.f64 (*.f64 lambda2 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (*.f64 lambda2 (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (*.f64 lambda2 #s(literal -1/6 binary64))))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(* phi1 (sin phi2))
(*.f64 phi1 (sin.f64 phi2))
(* phi1 (+ (sin phi2) (* -1/6 (* (pow phi1 2) (sin phi2)))))
(*.f64 phi1 (*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1)) #s(literal 1 binary64)) (sin.f64 phi2)))
(* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* 1/120 (* (pow phi1 2) (sin phi2)))))))
(*.f64 phi1 (+.f64 (sin.f64 phi2) (*.f64 (*.f64 phi1 phi1) (*.f64 (sin.f64 phi2) (+.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal 1/120 binary64)))))))
(* 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 phi1 (+.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1)) #s(literal 1 binary64)) (sin.f64 phi2)) (*.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 phi1 phi1) (*.f64 (sin.f64 phi2) (+.f64 (*.f64 (*.f64 phi1 phi1) #s(literal -1/5040 binary64)) #s(literal 1/120 binary64)))))))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(* phi2 (sin phi1))
(*.f64 phi2 (sin.f64 phi1))
(* phi2 (+ (sin phi1) (* -1/6 (* (pow phi2 2) (sin phi1)))))
(*.f64 phi2 (*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 phi2 phi2)) #s(literal 1 binary64)) (sin.f64 phi1)))
(* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* 1/120 (* (pow phi2 2) (sin phi1)))))))
(*.f64 phi2 (+.f64 (sin.f64 phi1) (*.f64 (*.f64 phi2 phi2) (*.f64 (sin.f64 phi1) (+.f64 #s(literal -1/6 binary64) (*.f64 #s(literal 1/120 binary64) (*.f64 phi2 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 phi2 (+.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 phi2 phi2)) #s(literal 1 binary64)) (sin.f64 phi1)) (*.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 #s(literal -1/5040 binary64) (*.f64 phi2 phi2)) #s(literal 1/120 binary64))) (*.f64 (*.f64 phi2 phi2) (*.f64 phi2 phi2)))))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(* -1 (* R lambda2))
(-.f64 #s(literal 0 binary64) (*.f64 R lambda2))
(+ (* -1 (* R lambda2)) (* R lambda1))
(*.f64 R (-.f64 lambda1 lambda2))
(+ (* -1 (* R lambda2)) (* R lambda1))
(*.f64 R (-.f64 lambda1 lambda2))
(+ (* -1 (* R lambda2)) (* R lambda1))
(*.f64 R (-.f64 lambda1 lambda2))
(* R lambda1)
(*.f64 R lambda1)
(* lambda1 (+ R (* -1 (/ (* R lambda2) lambda1))))
(*.f64 lambda1 (*.f64 R (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1))))
(* lambda1 (+ R (* -1 (/ (* R lambda2) lambda1))))
(*.f64 lambda1 (*.f64 R (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1))))
(* lambda1 (+ R (* -1 (/ (* R lambda2) lambda1))))
(*.f64 lambda1 (*.f64 R (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1))))
(* R lambda1)
(*.f64 R lambda1)
(* -1 (* lambda1 (+ (* -1 R) (/ (* R lambda2) lambda1))))
(*.f64 lambda1 (*.f64 R (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1))))
(* -1 (* lambda1 (+ (* -1 R) (/ (* R lambda2) lambda1))))
(*.f64 lambda1 (*.f64 R (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1))))
(* -1 (* lambda1 (+ (* -1 R) (/ (* R lambda2) lambda1))))
(*.f64 lambda1 (*.f64 R (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1))))
(* R lambda1)
(*.f64 R lambda1)
(+ (* -1 (* R lambda2)) (* R lambda1))
(*.f64 R (-.f64 lambda1 lambda2))
(+ (* -1 (* R lambda2)) (* R lambda1))
(*.f64 R (-.f64 lambda1 lambda2))
(+ (* -1 (* R lambda2)) (* R lambda1))
(*.f64 R (-.f64 lambda1 lambda2))
(* -1 (* R lambda2))
(-.f64 #s(literal 0 binary64) (*.f64 R lambda2))
(* lambda2 (+ (* -1 R) (/ (* R lambda1) lambda2)))
(*.f64 lambda2 (*.f64 R (+.f64 #s(literal -1 binary64) (/.f64 lambda1 lambda2))))
(* lambda2 (+ (* -1 R) (/ (* R lambda1) lambda2)))
(*.f64 lambda2 (*.f64 R (+.f64 #s(literal -1 binary64) (/.f64 lambda1 lambda2))))
(* lambda2 (+ (* -1 R) (/ (* R lambda1) lambda2)))
(*.f64 lambda2 (*.f64 R (+.f64 #s(literal -1 binary64) (/.f64 lambda1 lambda2))))
(* -1 (* R lambda2))
(-.f64 #s(literal 0 binary64) (*.f64 R lambda2))
(* -1 (* lambda2 (+ R (* -1 (/ (* R lambda1) lambda2)))))
(*.f64 lambda2 (*.f64 R (+.f64 #s(literal -1 binary64) (/.f64 lambda1 lambda2))))
(* -1 (* lambda2 (+ R (* -1 (/ (* R lambda1) lambda2)))))
(*.f64 lambda2 (*.f64 R (+.f64 #s(literal -1 binary64) (/.f64 lambda1 lambda2))))
(* -1 (* lambda2 (+ R (* -1 (/ (* R lambda1) lambda2)))))
(*.f64 lambda2 (*.f64 R (+.f64 #s(literal -1 binary64) (/.f64 lambda1 lambda2))))
(* R (- lambda1 lambda2))
(*.f64 R (-.f64 lambda1 lambda2))
(* R (- lambda1 lambda2))
(*.f64 R (-.f64 lambda1 lambda2))
(* R (- lambda1 lambda2))
(*.f64 R (-.f64 lambda1 lambda2))
(* R (- lambda1 lambda2))
(*.f64 R (-.f64 lambda1 lambda2))
(* R (- lambda1 lambda2))
(*.f64 R (-.f64 lambda1 lambda2))
(* R (- lambda1 lambda2))
(*.f64 R (-.f64 lambda1 lambda2))
(* R (- lambda1 lambda2))
(*.f64 R (-.f64 lambda1 lambda2))
(* R (- lambda1 lambda2))
(*.f64 R (-.f64 lambda1 lambda2))
(* R (- lambda1 lambda2))
(*.f64 R (-.f64 lambda1 lambda2))
(* R (- lambda1 lambda2))
(*.f64 R (-.f64 lambda1 lambda2))
(* R (- lambda1 lambda2))
(*.f64 R (-.f64 lambda1 lambda2))
(* R (- lambda1 lambda2))
(*.f64 R (-.f64 lambda1 lambda2))
(* -1 lambda2)
(-.f64 #s(literal 0 binary64) lambda2)
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
lambda1
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(*.f64 lambda1 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)))
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(*.f64 lambda1 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)))
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(*.f64 lambda1 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)))
lambda1
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(*.f64 lambda1 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)))
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(*.f64 lambda1 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)))
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(*.f64 lambda1 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)))
lambda1
(+ lambda1 (* -1 lambda2))
(-.f64 lambda1 lambda2)
(+ lambda1 (* -1 lambda2))
(-.f64 lambda1 lambda2)
(+ lambda1 (* -1 lambda2))
(-.f64 lambda1 lambda2)
(* -1 lambda2)
(-.f64 #s(literal 0 binary64) lambda2)
(* lambda2 (- (/ lambda1 lambda2) 1))
(*.f64 lambda2 (+.f64 #s(literal -1 binary64) (/.f64 lambda1 lambda2)))
(* lambda2 (- (/ lambda1 lambda2) 1))
(*.f64 lambda2 (+.f64 #s(literal -1 binary64) (/.f64 lambda1 lambda2)))
(* lambda2 (- (/ lambda1 lambda2) 1))
(*.f64 lambda2 (+.f64 #s(literal -1 binary64) (/.f64 lambda1 lambda2)))
(* -1 lambda2)
(-.f64 #s(literal 0 binary64) lambda2)
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(*.f64 lambda2 (+.f64 #s(literal -1 binary64) (/.f64 lambda1 lambda2)))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(*.f64 lambda2 (+.f64 #s(literal -1 binary64) (/.f64 lambda1 lambda2)))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(*.f64 lambda2 (+.f64 #s(literal -1 binary64) (/.f64 lambda1 lambda2)))
(cos (neg lambda2))
(cos.f64 lambda2)
(+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))
(+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))
(+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))
(+.f64 (cos.f64 lambda2) (*.f64 lambda1 (+.f64 (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (*.f64 lambda1 #s(literal -1/2 binary64))))))
(+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))
(+.f64 (cos.f64 lambda2) (*.f64 lambda1 (+.f64 (sin.f64 lambda2) (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (*.f64 (*.f64 lambda1 #s(literal 1/6 binary64)) (sin.f64 lambda2)))))))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos lambda1)
(cos.f64 lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))
(+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))
(+.f64 (cos.f64 lambda1) (*.f64 lambda2 (+.f64 (sin.f64 lambda1) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda1) lambda2)))))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))
(+.f64 (cos.f64 lambda1) (*.f64 lambda2 (+.f64 (sin.f64 lambda1) (*.f64 lambda2 (+.f64 (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64)) (*.f64 #s(literal -1/6 binary64) (*.f64 lambda2 (sin.f64 lambda1))))))))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(* -1 lambda2)
(-.f64 #s(literal 0 binary64) lambda2)
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
lambda1
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(*.f64 lambda1 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)))
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(*.f64 lambda1 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)))
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(*.f64 lambda1 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)))
lambda1
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(*.f64 lambda1 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)))
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(*.f64 lambda1 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)))
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(*.f64 lambda1 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)))
lambda1
(+ lambda1 (* -1 lambda2))
(-.f64 lambda1 lambda2)
(+ lambda1 (* -1 lambda2))
(-.f64 lambda1 lambda2)
(+ lambda1 (* -1 lambda2))
(-.f64 lambda1 lambda2)
(* -1 lambda2)
(-.f64 #s(literal 0 binary64) lambda2)
(* lambda2 (- (/ lambda1 lambda2) 1))
(*.f64 lambda2 (+.f64 #s(literal -1 binary64) (/.f64 lambda1 lambda2)))
(* lambda2 (- (/ lambda1 lambda2) 1))
(*.f64 lambda2 (+.f64 #s(literal -1 binary64) (/.f64 lambda1 lambda2)))
(* lambda2 (- (/ lambda1 lambda2) 1))
(*.f64 lambda2 (+.f64 #s(literal -1 binary64) (/.f64 lambda1 lambda2)))
(* -1 lambda2)
(-.f64 #s(literal 0 binary64) lambda2)
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(*.f64 lambda2 (+.f64 #s(literal -1 binary64) (/.f64 lambda1 lambda2)))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(*.f64 lambda2 (+.f64 #s(literal -1 binary64) (/.f64 lambda1 lambda2)))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(*.f64 lambda2 (+.f64 #s(literal -1 binary64) (/.f64 lambda1 lambda2)))
(* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(acos (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(cos phi2)
(cos.f64 phi2)
(+ (cos phi2) (* phi1 (sin phi2)))
(+.f64 (cos.f64 phi2) (*.f64 phi1 (sin.f64 phi2)))
(+ (cos phi2) (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (cos phi2))))))
(+.f64 (cos.f64 phi2) (*.f64 phi1 (+.f64 (sin.f64 phi2) (*.f64 phi1 (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))
(+ (cos phi2) (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (cos phi2)) (* -1/6 (* phi1 (sin phi2))))))))
(+.f64 (cos.f64 phi2) (*.f64 phi1 (+.f64 (*.f64 phi1 (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))) (*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1)) #s(literal 1 binary64)) (sin.f64 phi2)))))
(+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(cos phi1)
(cos.f64 phi1)
(+ (cos phi1) (* phi2 (sin phi1)))
(+.f64 (cos.f64 phi1) (*.f64 phi2 (sin.f64 phi1)))
(+ (cos phi1) (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (cos phi1))))))
(+.f64 (cos.f64 phi1) (*.f64 phi2 (+.f64 (sin.f64 phi1) (*.f64 phi2 (*.f64 (cos.f64 phi1) #s(literal -1/2 binary64))))))
(+ (cos phi1) (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (cos phi1)) (* -1/6 (* phi2 (sin phi1))))))))
(+.f64 (cos.f64 phi1) (*.f64 phi2 (+.f64 (*.f64 phi2 (*.f64 (cos.f64 phi1) #s(literal -1/2 binary64))) (*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 phi2 phi2)) #s(literal 1 binary64)) (sin.f64 phi1)))))
(+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(- (+ (* 1/2 (cos (neg phi2))) (* (cos phi2) (cos (- lambda1 lambda2)))) (* 1/2 (cos phi2)))
(+.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64))
(- (+ (* 1/2 (cos (neg phi2))) (+ (* phi1 (- (* -1/2 (sin (neg phi2))) (* -1/2 (sin phi2)))) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos phi2)))
(+.f64 (+.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 phi2) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi2) #s(literal 1/2 binary64))))) #s(literal 0 binary64))
(- (+ (* 1/2 (cos (neg phi2))) (+ (* phi1 (- (+ (* -1/2 (sin (neg phi2))) (* phi1 (- (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/4 (cos (neg phi2)))) (* -1/4 (cos phi2))))) (* -1/2 (sin phi2)))) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos phi2)))
(+.f64 (+.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 phi1 (+.f64 (*.f64 phi1 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)))) (+.f64 (*.f64 (sin.f64 phi2) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi2) #s(literal 1/2 binary64)))))) #s(literal 0 binary64))
(- (+ (* 1/2 (cos (neg phi2))) (+ (* phi1 (- (+ (* -1/2 (sin (neg phi2))) (* phi1 (- (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (+ (* -1/4 (cos (neg phi2))) (* phi1 (- (* 1/12 (sin (neg phi2))) (* 1/12 (sin phi2)))))) (* -1/4 (cos phi2))))) (* -1/2 (sin phi2)))) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos phi2)))
(+.f64 (+.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 phi1 (+.f64 (*.f64 phi1 (+.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 phi2) #s(literal -1/12 binary64)) (*.f64 (sin.f64 phi2) #s(literal -1/12 binary64)))))) (+.f64 (*.f64 (sin.f64 phi2) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi2) #s(literal 1/2 binary64)))))) #s(literal 0 binary64))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(* (cos phi1) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))
(+ (* phi2 (- (* 1/2 (sin phi1)) (* -1/2 (sin phi1)))) (* (cos phi1) (cos (- lambda1 lambda2))))
(+.f64 (*.f64 phi2 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(+ (* phi2 (- (+ (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (sin phi1))) (* -1/2 (sin phi1)))) (* (cos phi1) (cos (- lambda1 lambda2))))
(+.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 phi2 (+.f64 (sin.f64 phi1) (*.f64 (*.f64 phi2 (*.f64 (cos.f64 phi1) #s(literal -1/2 binary64))) (cos.f64 (-.f64 lambda1 lambda2))))))
(+ (* phi2 (- (+ (* 1/2 (sin phi1)) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* phi2 (- (* -1/12 (sin phi1)) (* 1/12 (sin phi1))))))) (* -1/2 (sin phi1)))) (* (cos phi1) (cos (- lambda1 lambda2))))
(+.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 phi2 (+.f64 (*.f64 phi2 (+.f64 (*.f64 phi2 (*.f64 (sin.f64 phi1) #s(literal -1/6 binary64))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi1) #s(literal -1/2 binary64))))) (sin.f64 phi1))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 lambda1 (sin.f64 lambda2))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 lambda1 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2))) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 lambda1 #s(literal -1/2 binary64))))) (+.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 lambda1 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2))) (*.f64 lambda1 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 phi1) lambda1)) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 0 binary64) (sin.f64 lambda2)))))))) (+.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* 1/2 (cos (+ phi1 phi2))))
(+.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* 1/2 (cos (+ phi1 phi2))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 lambda2 (sin.f64 lambda1))) (+.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* 1/2 (cos (+ phi1 phi2))))
(+.f64 (+.f64 (*.f64 lambda2 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 lambda2 #s(literal -1/2 binary64))))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))) (+.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* 1/2 (cos (+ phi1 phi2))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 lambda2 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (*.f64 lambda2 (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (*.f64 lambda2 #s(literal -1/6 binary64))))))) (+.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1)))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2)))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(* R (acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2)))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1))))))
(acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1))))))
(acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1))))))
(acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (neg (+ phi2 (* -1 phi1))))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi2 (* -1 phi1))))))
(acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2))))))
(acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2))))))
(acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2))))))
(acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (+ phi1 (* -1 phi2)))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (- phi1 (* -1 phi2))))))
(acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(acos (- (+ (* 1/2 (cos (- phi1 phi2))) (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))) (* 1/2 (cos (+ phi1 phi2)))))
(acos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))
(* 1/2 (cos (neg phi2)))
(*.f64 (cos.f64 phi2) #s(literal 1/2 binary64))
(+ (* -1/2 (* phi1 (sin (neg phi2)))) (* 1/2 (cos (neg phi2))))
(+.f64 (*.f64 (cos.f64 phi2) #s(literal 1/2 binary64)) (*.f64 phi1 (*.f64 (sin.f64 phi2) #s(literal 1/2 binary64))))
(+ (* 1/2 (cos (neg phi2))) (* phi1 (+ (* -1/2 (sin (neg phi2))) (* -1/4 (* phi1 (cos (neg phi2)))))))
(+.f64 (*.f64 (cos.f64 phi2) #s(literal 1/2 binary64)) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 phi2) #s(literal 1/2 binary64)) (*.f64 (*.f64 phi1 (cos.f64 phi2)) #s(literal -1/4 binary64)))))
(+ (* 1/2 (cos (neg phi2))) (* phi1 (+ (* -1/2 (sin (neg phi2))) (* phi1 (+ (* -1/4 (cos (neg phi2))) (* 1/12 (* phi1 (sin (neg phi2)))))))))
(+.f64 (*.f64 (cos.f64 phi2) #s(literal 1/2 binary64)) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 phi2) #s(literal 1/2 binary64)) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 phi2) #s(literal -1/4 binary64)) (*.f64 phi1 (*.f64 (sin.f64 phi2) #s(literal -1/12 binary64))))))))
(* 1/2 (cos (- phi1 phi2)))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))
(* 1/2 (cos (- phi1 phi2)))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))
(* 1/2 (cos (- phi1 phi2)))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))
(* 1/2 (cos (- phi1 phi2)))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))
(* 1/2 (cos (neg (+ phi2 (* -1 phi1)))))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))
(* 1/2 (cos (neg (+ phi2 (* -1 phi1)))))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))
(* 1/2 (cos (neg (+ phi2 (* -1 phi1)))))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))
(* 1/2 (cos (neg (+ phi2 (* -1 phi1)))))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))
(* 1/2 (cos phi1))
(*.f64 (cos.f64 phi1) #s(literal 1/2 binary64))
(+ (* 1/2 (cos phi1)) (* 1/2 (* phi2 (sin phi1))))
(*.f64 (+.f64 (cos.f64 phi1) (*.f64 phi2 (sin.f64 phi1))) #s(literal 1/2 binary64))
(+ (* 1/2 (cos phi1)) (* phi2 (+ (* -1/4 (* phi2 (cos phi1))) (* 1/2 (sin phi1)))))
(+.f64 (*.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (*.f64 phi2 (+.f64 (*.f64 (sin.f64 phi1) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) phi2) #s(literal -1/4 binary64)))))
(+ (* 1/2 (cos phi1)) (* phi2 (+ (* 1/2 (sin phi1)) (* phi2 (+ (* -1/4 (cos phi1)) (* -1/12 (* phi2 (sin phi1))))))))
(+.f64 (*.f64 (cos.f64 phi1) #s(literal 1/2 binary64)) (*.f64 phi2 (+.f64 (*.f64 (sin.f64 phi1) #s(literal 1/2 binary64)) (*.f64 phi2 (+.f64 (*.f64 (cos.f64 phi1) #s(literal -1/4 binary64)) (*.f64 (*.f64 phi2 (sin.f64 phi1)) #s(literal -1/12 binary64)))))))
(* 1/2 (cos (- phi1 phi2)))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))
(* 1/2 (cos (- phi1 phi2)))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))
(* 1/2 (cos (- phi1 phi2)))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))
(* 1/2 (cos (- phi1 phi2)))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))
(* 1/2 (cos (+ phi1 (* -1 phi2))))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))
(* 1/2 (cos (+ phi1 (* -1 phi2))))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))
(* 1/2 (cos (+ phi1 (* -1 phi2))))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))
(* 1/2 (cos (+ phi1 (* -1 phi2))))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)))
(cos lambda1)
(cos.f64 lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))
(+ (cos lambda1) (* lambda2 (+ (sin lambda1) (* -1/2 (* lambda2 (cos lambda1))))))
(+.f64 (cos.f64 lambda1) (*.f64 lambda2 (+.f64 (sin.f64 lambda1) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda1) lambda2)))))
(+ (cos lambda1) (* lambda2 (+ (sin lambda1) (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))))))
(+.f64 (cos.f64 lambda1) (*.f64 lambda2 (+.f64 (sin.f64 lambda1) (*.f64 lambda2 (+.f64 (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64)) (*.f64 #s(literal -1/6 binary64) (*.f64 lambda2 (sin.f64 lambda1))))))))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(cos lambda2)
(cos.f64 lambda2)
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))
(+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))
(+.f64 (cos.f64 lambda2) (*.f64 lambda1 (+.f64 (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (*.f64 lambda1 #s(literal -1/2 binary64))))))
(+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))))))
(+.f64 (cos.f64 lambda2) (*.f64 lambda1 (+.f64 (sin.f64 lambda2) (*.f64 lambda1 (+.f64 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (*.f64 #s(literal -1/6 binary64) (*.f64 lambda1 (sin.f64 lambda2))))))))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(*.f64 (cos.f64 phi2) (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(+ (* phi1 (sin phi2)) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+.f64 (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 phi1 (sin.f64 phi2)))
(+ (* 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)))))
(+.f64 (*.f64 phi1 (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 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)))))
(+.f64 (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 phi1 (+.f64 (*.f64 (*.f64 phi1 (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))) (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1)) #s(literal 1 binary64)) (sin.f64 phi2)))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(*.f64 (cos.f64 phi1) (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(+ (* phi2 (sin phi1)) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+.f64 (*.f64 (cos.f64 phi1) (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 phi2 (sin.f64 phi1)))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+.f64 (*.f64 phi2 (sin.f64 phi1)) (*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 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)))))
(+.f64 (*.f64 (cos.f64 phi1) (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 phi2 (+.f64 (*.f64 phi2 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) #s(literal -1/2 binary64)))) (*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 phi2 phi2)) #s(literal 1 binary64)) (sin.f64 phi1)))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (+.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 lambda2 (sin.f64 lambda1)))))
(+ (* 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))))
(+.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 lambda2 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 lambda2 #s(literal -1/2 binary64))))))
(+ (* 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))))
(+.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (+.f64 (*.f64 lambda2 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (*.f64 lambda2 (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (*.f64 lambda2 #s(literal -1/6 binary64))))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 lambda1 (sin.f64 lambda2))) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 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))))
(+.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 lambda1 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2))) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 lambda1 #s(literal -1/2 binary64))))))
(+ (* 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))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (+.f64 (*.f64 lambda1 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2))) (*.f64 lambda1 (+.f64 (*.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 phi1) lambda1)) (*.f64 (cos.f64 phi2) (sin.f64 lambda2))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 lambda1 (sin.f64 lambda2))) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(+.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 lambda1 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2))) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 lambda1 #s(literal -1/2 binary64))))))
(+ (* 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))))
(+.f64 (*.f64 lambda1 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2))) (*.f64 lambda1 (+.f64 (*.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 phi1) lambda1)) (*.f64 (cos.f64 phi2) (sin.f64 lambda2))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos lambda1) (* (cos phi1) (cos phi2)))
(*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(+.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 lambda2 (sin.f64 lambda1))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(+.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 lambda2 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 lambda2 #s(literal -1/2 binary64))))))
(+ (* 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))))
(+.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 lambda2 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (*.f64 lambda2 (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (*.f64 lambda2 #s(literal -1/6 binary64))))))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(*.f64 (cos.f64 phi2) (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 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)))))
(*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 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)))))))))
(+.f64 (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 phi1 (*.f64 phi1 (*.f64 (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64)))))))
(+ (* (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))))))))))
(+.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (+.f64 (*.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64)) #s(literal 1/24 binary64))) (*.f64 (*.f64 phi1 phi1) (*.f64 phi1 phi1))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(*.f64 (cos.f64 phi1) (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 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)))))
(*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 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)))))))))
(+.f64 (*.f64 (cos.f64 phi1) (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (cos.f64 phi1) (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64))))))
(+ (* (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))))))))))
(+.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (*.f64 phi2 (*.f64 phi2 (*.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (cos.f64 phi1) (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (+.f64 (*.f64 (*.f64 phi2 phi2) #s(literal -1/720 binary64)) #s(literal 1/24 binary64)))))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(cos phi2)
(cos.f64 phi2)
(+ (cos phi2) (* -1 (* phi1 (sin phi2))))
(-.f64 (cos.f64 phi2) (*.f64 phi1 (sin.f64 phi2)))
(+ (cos phi2) (* phi1 (- (* -1/2 (* phi1 (cos phi2))) (sin phi2))))
(+.f64 (cos.f64 phi2) (*.f64 phi1 (-.f64 (*.f64 phi1 (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))) (sin.f64 phi2))))
(+ (cos phi2) (* phi1 (- (* phi1 (+ (* -1/2 (cos phi2)) (* 1/6 (* phi1 (sin phi2))))) (sin phi2))))
(+.f64 (cos.f64 phi2) (*.f64 phi1 (-.f64 (*.f64 phi1 (+.f64 (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64)) (*.f64 phi1 (*.f64 (sin.f64 phi2) #s(literal 1/6 binary64))))) (sin.f64 phi2))))
(cos (+ phi1 phi2))
(cos.f64 (+.f64 phi1 phi2))
(cos (+ phi1 phi2))
(cos.f64 (+.f64 phi1 phi2))
(cos (+ phi1 phi2))
(cos.f64 (+.f64 phi1 phi2))
(cos (+ phi1 phi2))
(cos.f64 (+.f64 phi1 phi2))
(cos (- phi2 (* -1 phi1)))
(cos.f64 (+.f64 phi1 phi2))
(cos (- phi2 (* -1 phi1)))
(cos.f64 (+.f64 phi1 phi2))
(cos (- phi2 (* -1 phi1)))
(cos.f64 (+.f64 phi1 phi2))
(cos (- phi2 (* -1 phi1)))
(cos.f64 (+.f64 phi1 phi2))
(cos phi1)
(cos.f64 phi1)
(+ (cos phi1) (* -1 (* phi2 (sin phi1))))
(-.f64 (cos.f64 phi1) (*.f64 phi2 (sin.f64 phi1)))
(+ (cos phi1) (* phi2 (- (* -1/2 (* phi2 (cos phi1))) (sin phi1))))
(+.f64 (cos.f64 phi1) (*.f64 phi2 (-.f64 (*.f64 phi2 (*.f64 (cos.f64 phi1) #s(literal -1/2 binary64))) (sin.f64 phi1))))
(+ (cos phi1) (* phi2 (- (* phi2 (+ (* -1/2 (cos phi1)) (* 1/6 (* phi2 (sin phi1))))) (sin phi1))))
(+.f64 (cos.f64 phi1) (*.f64 phi2 (-.f64 (*.f64 phi2 (+.f64 (*.f64 (cos.f64 phi1) #s(literal -1/2 binary64)) (*.f64 (*.f64 phi2 (sin.f64 phi1)) #s(literal 1/6 binary64)))) (sin.f64 phi1))))
(cos (+ phi1 phi2))
(cos.f64 (+.f64 phi1 phi2))
(cos (+ phi1 phi2))
(cos.f64 (+.f64 phi1 phi2))
(cos (+ phi1 phi2))
(cos.f64 (+.f64 phi1 phi2))
(cos (+ phi1 phi2))
(cos.f64 (+.f64 phi1 phi2))
(cos (- phi1 (* -1 phi2)))
(cos.f64 (+.f64 phi1 phi2))
(cos (- phi1 (* -1 phi2)))
(cos.f64 (+.f64 phi1 phi2))
(cos (- phi1 (* -1 phi2)))
(cos.f64 (+.f64 phi1 phi2))
(cos (- phi1 (* -1 phi2)))
(cos.f64 (+.f64 phi1 phi2))
(cos (neg phi2))
(cos.f64 phi2)
(+ (cos (neg phi2)) (* -1 (* phi1 (sin (neg phi2)))))
(+.f64 (cos.f64 phi2) (*.f64 phi1 (sin.f64 phi2)))
(+ (cos (neg phi2)) (* phi1 (- (* -1/2 (* phi1 (cos (neg phi2)))) (sin (neg phi2)))))
(+.f64 (cos.f64 phi2) (*.f64 phi1 (+.f64 (sin.f64 phi2) (*.f64 phi1 (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))))))
(+ (cos (neg phi2)) (* phi1 (- (* phi1 (+ (* -1/2 (cos (neg phi2))) (* 1/6 (* phi1 (sin (neg phi2)))))) (sin (neg phi2)))))
(+.f64 (cos.f64 phi2) (*.f64 phi1 (+.f64 (*.f64 phi1 (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))) (*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1)) #s(literal 1 binary64)) (sin.f64 phi2)))))
(cos (- phi1 phi2))
(cos.f64 (-.f64 phi2 phi1))
(cos (- phi1 phi2))
(cos.f64 (-.f64 phi2 phi1))
(cos (- phi1 phi2))
(cos.f64 (-.f64 phi2 phi1))
(cos (- phi1 phi2))
(cos.f64 (-.f64 phi2 phi1))
(cos (neg (+ phi2 (* -1 phi1))))
(cos.f64 (-.f64 phi2 phi1))
(cos (neg (+ phi2 (* -1 phi1))))
(cos.f64 (-.f64 phi2 phi1))
(cos (neg (+ phi2 (* -1 phi1))))
(cos.f64 (-.f64 phi2 phi1))
(cos (neg (+ phi2 (* -1 phi1))))
(cos.f64 (-.f64 phi2 phi1))
(cos phi1)
(cos.f64 phi1)
(+ (cos phi1) (* phi2 (sin phi1)))
(+.f64 (cos.f64 phi1) (*.f64 phi2 (sin.f64 phi1)))
(+ (cos phi1) (* phi2 (- (* -1/2 (* phi2 (cos phi1))) (* -1 (sin phi1)))))
(+.f64 (cos.f64 phi1) (*.f64 phi2 (+.f64 (sin.f64 phi1) (*.f64 phi2 (*.f64 (cos.f64 phi1) #s(literal -1/2 binary64))))))
(+ (cos phi1) (* phi2 (- (* phi2 (+ (* -1/2 (cos phi1)) (* -1/6 (* phi2 (sin phi1))))) (* -1 (sin phi1)))))
(+.f64 (cos.f64 phi1) (*.f64 phi2 (+.f64 (*.f64 phi2 (*.f64 (cos.f64 phi1) #s(literal -1/2 binary64))) (*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 phi2 phi2)) #s(literal 1 binary64)) (sin.f64 phi1)))))
(cos (- phi1 phi2))
(cos.f64 (-.f64 phi2 phi1))
(cos (- phi1 phi2))
(cos.f64 (-.f64 phi2 phi1))
(cos (- phi1 phi2))
(cos.f64 (-.f64 phi2 phi1))
(cos (- phi1 phi2))
(cos.f64 (-.f64 phi2 phi1))
(cos (+ phi1 (* -1 phi2)))
(cos.f64 (-.f64 phi2 phi1))
(cos (+ phi1 (* -1 phi2)))
(cos.f64 (-.f64 phi2 phi1))
(cos (+ phi1 (* -1 phi2)))
(cos.f64 (-.f64 phi2 phi1))
(cos (+ phi1 (* -1 phi2)))
(cos.f64 (-.f64 phi2 phi1))
(* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(*.f64 (cos.f64 phi2) (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 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)))))
(*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 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)))))))))
(+.f64 (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 phi1 (*.f64 phi1 (*.f64 (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64)))))))
(+ (* (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))))))))))
(+.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (+.f64 (*.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64)) #s(literal 1/24 binary64))) (*.f64 (*.f64 phi1 phi1) (*.f64 phi1 phi1))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(*.f64 (cos.f64 phi1) (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 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)))))
(*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 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)))))))))
(+.f64 (*.f64 (cos.f64 phi1) (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (cos.f64 phi1) (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 phi2 phi2) #s(literal 1/24 binary64))))))
(+ (* (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))))))))))
(+.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (*.f64 phi2 (*.f64 phi2 (*.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (cos.f64 phi1) (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (+.f64 (*.f64 (*.f64 phi2 phi2) #s(literal -1/720 binary64)) #s(literal 1/24 binary64)))))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos lambda1) (* (cos phi1) (cos phi2)))
(*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(+.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 lambda2 (sin.f64 lambda1))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(+.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 lambda2 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 lambda2 #s(literal -1/2 binary64))))))
(+ (* 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))))
(+.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 lambda2 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (*.f64 lambda2 (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (*.f64 lambda2 #s(literal -1/6 binary64))))))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 lambda1 (sin.f64 lambda2))) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(+.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 lambda1 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2))) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 lambda1 #s(literal -1/2 binary64))))))
(+ (* 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))))
(+.f64 (*.f64 lambda1 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2))) (*.f64 lambda1 (+.f64 (*.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 phi1) lambda1)) (*.f64 (cos.f64 phi2) (sin.f64 lambda2))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))

eval379.0ms (1.5%)

Memory
11.6MiB live, 544.5MiB allocated
Compiler

Compiled 83 372 to 4 894 computations (94.1% saved)

prune396.0ms (1.6%)

Memory
6.9MiB live, 609.7MiB allocated
Pruning

115 alts after pruning (111 fresh and 4 done)

PrunedKeptTotal
New2 169382 207
Fresh97382
Picked235
Done011
Total2 1801152 295
Accuracy
99.7%
Counts
2 295 → 115
Alt Table
Click to see full alt table
StatusAccuracyProgram
74.3%
(fma.f64 (/.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
75.0%
(fma.f64 (/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64))) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (/.f64 R (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))))
73.9%
(fma.f64 (/.f64 (*.f64 (cbrt.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64))) (cbrt.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)))) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
▶75.1%
(fma.f64 (/.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64)))) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
75.3%
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64))) R) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64))))
75.1%
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64))) R) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
75.1%
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))) R))
74.9%
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))) R))
75.3%
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) R))
93.7%
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))) R))
93.4%
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))))) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))))) R))
93.6%
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))) R))
45.0%
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (+.f64 (sin.f64 lambda2) (*.f64 lambda1 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))))))))))) R))
49.3%
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))))) R))
93.3%
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))))))) R))
54.1%
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))))) R))
44.6%
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 phi1 (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
75.0%
(fma.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) R (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))))
75.7%
(/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64))) R) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
3.6%
(-.f64 #s(literal 0 binary64) (*.f64 R lambda2))
75.7%
(+.f64 (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))) (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)))
75.8%
(+.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R) (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
74.6%
(*.f64 (fma.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) R)
55.3%
(*.f64 (fma.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) R)
74.4%
(*.f64 (fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) R)
55.1%
(*.f64 (fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) R)
41.6%
(*.f64 (fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) R)
42.8%
(*.f64 (/.f64 (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #s(literal 2 binary64))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) R)
5.3%
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (*.f64 lambda1 (*.f64 lambda1 lambda1))) (+.f64 (*.f64 lambda2 lambda2) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda2)))) R)
8.7%
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2)) R)
75.8%
(*.f64 (/.f64 (+.f64 (*.f64 (PI.f64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64))))) (*.f64 #s(literal 2 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)))) R)
5.3%
(*.f64 (/.f64 (+.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (pow.f64 (neg.f64 lambda1) #s(literal 3 binary64))) (+.f64 (*.f64 lambda2 lambda2) (-.f64 (*.f64 (neg.f64 lambda1) (neg.f64 lambda1)) (*.f64 lambda2 (neg.f64 lambda1))))) R)
56.4%
(*.f64 (-.f64 (/.f64 (/.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal 8 binary64)) (+.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))))) (/.f64 (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64)) (+.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))))) R)
42.8%
(*.f64 (-.f64 (/.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (/.f64 (pow.f64 (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #s(literal 2 binary64)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))) R)
2.8%
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2))) R)
75.8%
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
56.5%
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) R)
42.8%
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) R)
2.6%
(*.f64 (-.f64 phi1 phi2) R)
9.4%
(*.f64 (-.f64 lambda2 lambda1) R)
1.3%
(*.f64 (*.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (+.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (-.f64 phi2 phi1)))) R)
1.0%
(*.f64 (*.f64 (/.f64 (+.f64 phi1 phi2) (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))))) (/.f64 (-.f64 phi1 phi2) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2))))) R)
19.3%
(*.f64 (fabs.f64 (remainder.f64 (-.f64 phi1 phi2) (*.f64 #s(literal 2 binary64) (PI.f64)))) R)
19.6%
(*.f64 (fabs.f64 (remainder.f64 (-.f64 lambda1 lambda2) (*.f64 #s(literal 2 binary64) (PI.f64)))) R)
53.5%
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)))) R)
76.0%
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)
34.9%
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) R)
▶30.1%
(*.f64 (acos.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) R)
75.7%
(*.f64 (acos.f64 (/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
30.0%
(*.f64 (acos.f64 (/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))))) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) R)
30.0%
(*.f64 (acos.f64 (/.f64 (+.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))) (+.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))))))) R)
42.9%
(*.f64 (acos.f64 (/.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (cos.f64 phi1)) (cos.f64 (+.f64 lambda2 lambda1)))) R)
24.8%
(*.f64 (acos.f64 (/.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (cos.f64 (+.f64 lambda1 lambda2)))) R)
32.9%
(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (+.f64 (-.f64 phi1 lambda2) lambda1)))))) R)
75.8%
(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) R)
75.9%
(*.f64 (acos.f64 (-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))))) R)
33.4%
(*.f64 (acos.f64 (-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))))))) R)
60.3%
(*.f64 (acos.f64 (-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (acos.f64 (cos.f64 (-.f64 lambda1 lambda2))))))))) R)
46.2%
(*.f64 (acos.f64 (-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1)))))) R)
29.8%
(*.f64 (acos.f64 (+.f64 (/.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) R)
▶94.1%
(*.f64 (acos.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 3 binary64))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (-.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
86.2%
(*.f64 (acos.f64 (+.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
47.0%
(*.f64 (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 phi2 (sin.f64 phi1)))) R)
35.3%
(*.f64 (acos.f64 (+.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1))) (*.f64 phi1 (sin.f64 phi2))))) R)
39.2%
(*.f64 (acos.f64 (+.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1))) (*.f64 phi1 (sin.f64 phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
✓94.3%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)
54.2%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))) R)
26.3%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)
75.5%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (cos.f64 (+.f64 lambda2 lambda1))))))) R)
38.4%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))))) R)
✓56.6%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)))) R)
54.7%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))) R)
✓34.9%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) R)
31.7%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) R)
32.0%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))) R)
30.1%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) R)
36.8%
(*.f64 (acos.f64 (+.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 phi1 (sin.f64 phi2)))) R)
36.4%
(*.f64 (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 phi2 (sin.f64 phi1)))) R)
34.1%
(*.f64 (acos.f64 (+.f64 (*.f64 phi2 (sin.f64 phi1)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 phi2 (*.f64 phi2 #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
59.0%
(*.f64 (acos.f64 (+.f64 (*.f64 phi2 (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
37.7%
(*.f64 (acos.f64 (+.f64 (*.f64 phi1 (*.f64 (sin.f64 phi2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal 1/120 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
35.2%
(*.f64 (acos.f64 (+.f64 (*.f64 phi1 (sin.f64 phi2)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
57.8%
(*.f64 (acos.f64 (+.f64 (*.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)
45.3%
(*.f64 (acos.f64 (+.f64 (*.f64 phi1 (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
25.9%
(*.f64 (acos.f64 (+.f64 (*.f64 phi1 (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) R)
17.1%
(*.f64 (acos.f64 (+.f64 (*.f64 #s(literal 0 binary64) (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2)))) (*.f64 #s(literal 1 binary64) (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2)))))) R)
14.6%
(*.f64 (acos.f64 (+.f64 (cos.f64 phi2) (*.f64 phi1 (sin.f64 phi2)))) R)
11.4%
(*.f64 (acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (+.f64 (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (*.f64 lambda1 #s(literal -1/2 binary64))))))) R)
▶11.7%
(*.f64 (acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))) R)
11.5%
(*.f64 (acos.f64 (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))) R)
53.3%
(*.f64 (acos.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))) R)
53.5%
(*.f64 (acos.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1))) R)
17.7%
(*.f64 (acos.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1/2 binary64) (*.f64 phi1 (*.f64 phi1 (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64)))))))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
17.6%
(*.f64 (acos.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1/2 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal 1/24 binary64)))))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
17.5%
(*.f64 (acos.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
43.1%
(*.f64 (acos.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) R)
53.5%
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) R)
53.5%
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) R)
24.5%
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))) R)
25.0%
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (sin.f64 lambda1)) (+.f64 (*.f64 lambda2 (*.f64 lambda2 #s(literal 1/6 binary64))) #s(literal -1 binary64)))))))) R)
25.0%
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (+.f64 (sin.f64 lambda1) (*.f64 lambda2 (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64)))))))) R)
26.6%
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))) R)
31.0%
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 lambda2))) R)
32.2%
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 lambda1))) R)
32.1%
(*.f64 (acos.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) R)
15.7%
(*.f64 (acos.f64 (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))) R)
5.3%
(*.f64 (acos.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))))))) R)
29.5%
(*.f64 (acos.f64 (cos.f64 (-.f64 phi2 phi1))) R)
✓24.8%
(*.f64 (acos.f64 (cos.f64 (-.f64 lambda1 lambda2))) R)
16.0%
(*.f64 (acos.f64 (cos.f64 (fabs.f64 (remainder.f64 (-.f64 lambda1 lambda2) (*.f64 #s(literal 2 binary64) (PI.f64)))))) R)
19.2%
(*.f64 (acos.f64 (cos.f64 phi2)) R)
18.6%
(*.f64 (acos.f64 (cos.f64 phi1)) R)
16.4%
(*.f64 (acos.f64 (cos.f64 lambda2)) R)
16.5%
(*.f64 (acos.f64 (cos.f64 lambda1)) R)
▶3.9%
(*.f64 lambda1 R)
Compiler

Compiled 6 886 to 4 379 computations (36.4% saved)

simplify624.0ms (2.5%)

Memory
-14.5MiB live, 955.6MiB allocated
Algorithm
1×egg-herbie
Localize:

Found 17 expressions of interest:

NewMetricScoreProgram
✓cost-diff0
(*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64)))
✓cost-diff0
(/.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64)))) #s(literal 2 binary64))
✓cost-diff6528
(fma.f64 (/.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64)))) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
✓cost-diff6656
(cbrt.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))))
✓cost-diff0
(cos.f64 lambda2)
✓cost-diff0
(acos.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
✓cost-diff0
(*.f64 (acos.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) R)
✓cost-diff6272
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
✓cost-diff0
(cos.f64 lambda2)
✓cost-diff0
(+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))
✓cost-diff0
(acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))
✓cost-diff0
(*.f64 (acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))) R)
✓cost-diff0
(*.f64 lambda1 R)
✓cost-diff0
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 3 binary64))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (-.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
✓cost-diff0
(+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 3 binary64))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (-.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
✓cost-diff0
(acos.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 3 binary64))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (-.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
✓cost-diff0
(*.f64 (acos.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 3 binary64))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (-.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
Rules
29 624×accelerator-lowering-fma.f32
29 624×accelerator-lowering-fma.f64
5 252×*-lowering-*.f32
5 252×*-lowering-*.f64
2 636×+-lowering-+.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
067842
1144829
2355829
31404829
42713829
55931829
08210796
Stop Event
1×iter limit
1×node limit
Calls
Call 1
Inputs
(* (acos (+ (/ (+ (pow (* (sin phi1) (sin phi2)) 3) (pow (* (cos lambda2) (* (cos lambda1) (* (cos phi1) (cos phi2)))) 3)) (+ (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))) (* (* (cos lambda2) (* (cos lambda1) (* (cos phi1) (cos phi2)))) (- (* (cos lambda2) (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))))) (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))) R)
(acos (+ (/ (+ (pow (* (sin phi1) (sin phi2)) 3) (pow (* (cos lambda2) (* (cos lambda1) (* (cos phi1) (cos phi2)))) 3)) (+ (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))) (* (* (cos lambda2) (* (cos lambda1) (* (cos phi1) (cos phi2)))) (- (* (cos lambda2) (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))))) (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2))))))
(+ (/ (+ (pow (* (sin phi1) (sin phi2)) 3) (pow (* (cos lambda2) (* (cos lambda1) (* (cos phi1) (cos phi2)))) 3)) (+ (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))) (* (* (cos lambda2) (* (cos lambda1) (* (cos phi1) (cos phi2)))) (- (* (cos lambda2) (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))))) (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
(/ (+ (pow (* (sin phi1) (sin phi2)) 3) (pow (* (cos lambda2) (* (cos lambda1) (* (cos phi1) (cos phi2)))) 3)) (+ (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))) (* (* (cos lambda2) (* (cos lambda1) (* (cos phi1) (cos phi2)))) (- (* (cos lambda2) (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))
(+ (pow (* (sin phi1) (sin phi2)) 3) (pow (* (cos lambda2) (* (cos lambda1) (* (cos phi1) (cos phi2)))) 3))
(pow (* (sin phi1) (sin phi2)) 3)
(* (sin phi1) (sin phi2))
(sin phi1)
phi1
(sin phi2)
phi2
3
(pow (* (cos lambda2) (* (cos lambda1) (* (cos phi1) (cos phi2)))) 3)
(* (cos lambda2) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(cos lambda2)
lambda2
(* (cos lambda1) (* (cos phi1) (cos phi2)))
(cos lambda1)
lambda1
(* (cos phi1) (cos phi2))
(cos phi1)
(cos phi2)
(+ (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))) (* (* (cos lambda2) (* (cos lambda1) (* (cos phi1) (cos phi2)))) (- (* (cos lambda2) (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))))
(* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))
(- 1/2 (* 1/2 (cos (* 2 phi1))))
1/2
(* 1/2 (cos (* 2 phi1)))
(cos (* 2 phi1))
(* 2 phi1)
2
(- 1/2 (* 1/2 (cos (* 2 phi2))))
(* 1/2 (cos (* 2 phi2)))
(cos (* 2 phi2))
(* 2 phi2)
(* (* (cos lambda2) (* (cos lambda1) (* (cos phi1) (cos phi2)))) (- (* (cos lambda2) (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))
(- (* (cos lambda2) (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))
(* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2))))
(* (cos phi2) (* (sin lambda1) (sin lambda2)))
(* (sin lambda1) (sin lambda2))
(sin lambda1)
(sin lambda2)
R
(* lambda1 R)
lambda1
R
(* (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))) R)
(acos (+ (cos lambda2) (* lambda1 (sin lambda2))))
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(cos lambda2)
lambda2
(* lambda1 (sin lambda2))
lambda1
(sin lambda2)
R
(* (acos (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) R)
(acos (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))
(+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))
(cos lambda2)
lambda2
(cos lambda1)
lambda1
(* (sin lambda1) (sin lambda2))
(sin lambda1)
(sin lambda2)
R
(+ (* (/ (cbrt (* (PI) (* (PI) (PI)))) 2) R) (* (- 0 (asin (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))) R))
(/ (cbrt (* (PI) (* (PI) (PI)))) 2)
(cbrt (* (PI) (* (PI) (PI))))
(* (PI) (* (PI) (PI)))
(PI)
(* (PI) (PI))
2
R
(* (- 0 (asin (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))) R)
(- 0 (asin (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
0
(asin (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (sin phi1) (sin phi2))
(sin phi1)
phi1
(sin phi2)
phi2
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(cos phi1)
(* (cos phi2) (cos (- lambda1 lambda2)))
(cos phi2)
(cos (- lambda1 lambda2))
(- lambda1 lambda2)
lambda1
lambda2
Outputs
(* (acos (+ (/ (+ (pow (* (sin phi1) (sin phi2)) 3) (pow (* (cos lambda2) (* (cos lambda1) (* (cos phi1) (cos phi2)))) 3)) (+ (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))) (* (* (cos lambda2) (* (cos lambda1) (* (cos phi1) (cos phi2)))) (- (* (cos lambda2) (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))))) (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))) R)
(*.f64 (acos.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 3 binary64))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (-.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))))) R)
(acos (+ (/ (+ (pow (* (sin phi1) (sin phi2)) 3) (pow (* (cos lambda2) (* (cos lambda1) (* (cos phi1) (cos phi2)))) 3)) (+ (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))) (* (* (cos lambda2) (* (cos lambda1) (* (cos phi1) (cos phi2)))) (- (* (cos lambda2) (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))))) (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2))))))
(acos.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 3 binary64))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (-.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2))))))
(+ (/ (+ (pow (* (sin phi1) (sin phi2)) 3) (pow (* (cos lambda2) (* (cos lambda1) (* (cos phi1) (cos phi2)))) 3)) (+ (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))) (* (* (cos lambda2) (* (cos lambda1) (* (cos phi1) (cos phi2)))) (- (* (cos lambda2) (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))))) (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
(+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 3 binary64))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (-.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))))
(/ (+ (pow (* (sin phi1) (sin phi2)) 3) (pow (* (cos lambda2) (* (cos lambda1) (* (cos phi1) (cos phi2)))) 3)) (+ (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))) (* (* (cos lambda2) (* (cos lambda1) (* (cos phi1) (cos phi2)))) (- (* (cos lambda2) (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 3 binary64))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (-.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(+ (pow (* (sin phi1) (sin phi2)) 3) (pow (* (cos lambda2) (* (cos lambda1) (* (cos phi1) (cos phi2)))) 3))
(+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 3 binary64)))
(pow (* (sin phi1) (sin phi2)) 3)
(pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(sin phi1)
(sin.f64 phi1)
phi1
(sin phi2)
(sin.f64 phi2)
phi2
3
#s(literal 3 binary64)
(pow (* (cos lambda2) (* (cos lambda1) (* (cos phi1) (cos phi2)))) 3)
(pow.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 3 binary64))
(* (cos lambda2) (* (cos lambda1) (* (cos phi1) (cos phi2))))
(*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(cos lambda2)
(cos.f64 lambda2)
lambda2
(* (cos lambda1) (* (cos phi1) (cos phi2)))
(*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(cos lambda1)
(cos.f64 lambda1)
lambda1
(* (cos phi1) (cos phi2))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(cos phi1)
(cos.f64 phi1)
(cos phi2)
(cos.f64 phi2)
(+ (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))) (* (* (cos lambda2) (* (cos lambda1) (* (cos phi1) (cos phi2)))) (- (* (cos lambda2) (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))))
(+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (-.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))
(*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))
(- 1/2 (* 1/2 (cos (* 2 phi1))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))
1/2
#s(literal 1/2 binary64)
(* 1/2 (cos (* 2 phi1)))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))
(cos (* 2 phi1))
(cos.f64 (*.f64 phi1 #s(literal 2 binary64)))
(* 2 phi1)
(*.f64 phi1 #s(literal 2 binary64))
2
#s(literal 2 binary64)
(- 1/2 (* 1/2 (cos (* 2 phi2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))
(* 1/2 (cos (* 2 phi2)))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal 2 binary64))))
(cos (* 2 phi2))
(cos.f64 (*.f64 phi2 #s(literal 2 binary64)))
(* 2 phi2)
(*.f64 phi2 #s(literal 2 binary64))
(* (* (cos lambda2) (* (cos lambda1) (* (cos phi1) (cos phi2)))) (- (* (cos lambda2) (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))
(*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (-.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(- (* (cos lambda2) (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))
(-.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2))))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2))))
(* (cos phi2) (* (sin lambda1) (sin lambda2)))
(*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(sin lambda1)
(sin.f64 lambda1)
(sin lambda2)
(sin.f64 lambda2)
R
(* lambda1 R)
(*.f64 lambda1 R)
lambda1
R
(* (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))) R)
(*.f64 R (acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))))
(acos (+ (cos lambda2) (* lambda1 (sin lambda2))))
(acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))
(cos lambda2)
(cos.f64 lambda2)
lambda2
(* lambda1 (sin lambda2))
(*.f64 lambda1 (sin.f64 lambda2))
lambda1
(sin lambda2)
(sin.f64 lambda2)
R
(* (acos (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) R)
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))
(acos (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))
(+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(cos lambda2)
(cos.f64 lambda2)
lambda2
(cos lambda1)
(cos.f64 lambda1)
lambda1
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(sin lambda1)
(sin.f64 lambda1)
(sin lambda2)
(sin.f64 lambda2)
R
(+ (* (/ (cbrt (* (PI) (* (PI) (PI)))) 2) R) (* (- 0 (asin (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))) R))
(*.f64 R (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/ (cbrt (* (PI) (* (PI) (PI)))) 2)
(/.f64 (PI.f64) #s(literal 2 binary64))
(cbrt (* (PI) (* (PI) (PI))))
(PI.f64)
(* (PI) (* (PI) (PI)))
(*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64)))
(PI)
(PI.f64)
(* (PI) (PI))
(*.f64 (PI.f64) (PI.f64))
2
#s(literal 2 binary64)
R
(* (- 0 (asin (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))) R)
(*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 #s(literal 0 binary64) R))
(- 0 (asin (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))))
0
#s(literal 0 binary64)
(asin (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(sin phi1)
(sin.f64 phi1)
phi1
(sin phi2)
(sin.f64 phi2)
phi2
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(cos phi1)
(cos.f64 phi1)
(* (cos phi2) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))
(cos phi2)
(cos.f64 phi2)
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
lambda1
lambda2

localize615.0ms (2.5%)

Memory
30.2MiB live, 734.5MiB allocated
Localize:

Found 17 expressions of interest:

NewMetricScoreProgram
✓accuracy99.2%
(*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64)))
✓accuracy99.2%
(cbrt.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))))
✓accuracy95.1%
(fma.f64 (/.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64)))) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
✓accuracy52.3%
(PI.f64)
✓accuracy100.0%
(cos.f64 lambda1)
✓accuracy99.9%
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
✓accuracy99.9%
(*.f64 (acos.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) R)
✓accuracy81.1%
(acos.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
✓accuracy100.0%
(cos.f64 lambda2)
✓accuracy99.9%
(*.f64 lambda1 (sin.f64 lambda2))
✓accuracy99.9%
(*.f64 (acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))) R)
✓accuracy74.5%
(acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))
✓accuracy100.0%
(*.f64 lambda1 R)
✓accuracy99.5%
(pow.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 3 binary64))
✓accuracy94.9%
(acos.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 3 binary64))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (-.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
✓accuracy89.9%
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))
✓accuracy89.6%
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))
Samples
188.0ms49×2valid
136.0ms81×1valid
68.0ms98×0invalid
47.0ms8×2invalid
30.0ms19×1invalid
12.0ms1×5exit
Compiler

Compiled 850 to 69 computations (91.9% saved)

Precisions
Click to see histograms. Total time spent on operations: 420.0ms
ival-cos: 181.0ms (43.1% of total)
ival-mult: 64.0ms (15.2% of total)
ival-sin: 64.0ms (15.2% of total)
ival-acos: 33.0ms (7.9% of total)
adjust: 19.0ms (4.5% of total)
ival-add: 14.0ms (3.3% of total)
ival-pow: 13.0ms (3.1% of total)
ival-asin: 11.0ms (2.6% of total)
ival-sub: 10.0ms (2.4% of total)
ival-div: 6.0ms (1.4% of total)
ival-cbrt: 3.0ms (0.7% of total)
exact: 1.0ms (0.2% of total)
ival-pi: 1.0ms (0.2% of total)
ival-true: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)

series188.0ms (0.8%)

Memory
13.4MiB live, 317.2MiB allocated
Counts
23 → 600
Calls
Call 1
Inputs
#<alt (* (acos (+ (/ (+ (pow (* (sin phi1) (sin phi2)) 3) (pow (* (cos lambda2) (* (cos lambda1) (* (cos phi1) (cos phi2)))) 3)) (+ (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))) (* (* (cos lambda2) (* (cos lambda1) (* (cos phi1) (cos phi2)))) (- (* (cos lambda2) (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))))) (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))) R)>
#<alt (acos (+ (/ (+ (pow (* (sin phi1) (sin phi2)) 3) (pow (* (cos lambda2) (* (cos lambda1) (* (cos phi1) (cos phi2)))) 3)) (+ (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))) (* (* (cos lambda2) (* (cos lambda1) (* (cos phi1) (cos phi2)))) (- (* (cos lambda2) (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))))) (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2))))))>
#<alt (+ (/ (+ (pow (* (sin phi1) (sin phi2)) 3) (pow (* (cos lambda2) (* (cos lambda1) (* (cos phi1) (cos phi2)))) 3)) (+ (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))) (* (* (cos lambda2) (* (cos lambda1) (* (cos phi1) (cos phi2)))) (- (* (cos lambda2) (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))))) (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))>
#<alt (/ (+ (pow (* (sin phi1) (sin phi2)) 3) (pow (* (cos lambda2) (* (cos lambda1) (* (cos phi1) (cos phi2)))) 3)) (+ (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))) (* (* (cos lambda2) (* (cos lambda1) (* (cos phi1) (cos phi2)))) (- (* (cos lambda2) (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* lambda1 R)>
#<alt (* (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))) R)>
#<alt (acos (+ (cos lambda2) (* lambda1 (sin lambda2))))>
#<alt (+ (cos lambda2) (* lambda1 (sin lambda2)))>
#<alt (cos lambda2)>
#<alt (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))>
#<alt (* (acos (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) R)>
#<alt (acos (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))>
#<alt (cbrt (* (PI) (* (PI) (PI))))>
#<alt (+ (* (/ (cbrt (* (PI) (* (PI) (PI)))) 2) R) (* (- 0 (asin (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))) R))>
#<alt (/ (cbrt (* (PI) (* (PI) (PI)))) 2)>
#<alt (* (PI) (* (PI) (PI)))>
#<alt (- 1/2 (* 1/2 (cos (* 2 phi2))))>
#<alt (- 1/2 (* 1/2 (cos (* 2 phi1))))>
#<alt (pow (* (cos lambda2) (* (cos lambda1) (* (cos phi1) (cos phi2)))) 3)>
#<alt (* lambda1 (sin lambda2))>
#<alt (* (sin lambda1) (sin lambda2))>
#<alt (cos lambda1)>
#<alt (PI)>
Outputs
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2))))>
#<alt (+ (* phi1 (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))>
#<alt (+ (* phi1 (- (* phi1 (- (+ (* -3/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* -1/2 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* 1/2 (/ (cos (* 2 phi2)) (* (cos lambda1) (* (cos lambda2) (cos phi2))))))) (+ (* -1 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* -1 (/ (pow (sin phi2) 2) (* (cos lambda1) (* (cos lambda2) (cos phi2))))) (* 1/2 (/ 1 (* (cos lambda1) (* (cos lambda2) (cos phi2))))))))) (* -1 (sin phi2)))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))>
#<alt (+ (* phi1 (- (* phi1 (- (+ (* -3/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* -1/2 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (* 1/2 (/ (cos (* 2 phi2)) (* (cos lambda1) (* (cos lambda2) (cos phi2))))) (* phi1 (- (/ (pow (sin phi2) 3) (* (pow (cos lambda1) 2) (* (pow (cos lambda2) 2) (pow (cos phi2) 2)))) (+ (* -1 (/ (* (sin phi2) (- (+ (* -3/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* 1/2 (/ (cos (* 2 phi2)) (* (cos lambda1) (* (cos lambda2) (cos phi2)))))) (+ (* -1 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* -1 (/ (pow (sin phi2) 2) (* (cos lambda1) (* (cos lambda2) (cos phi2))))) (* 1/2 (/ 1 (* (cos lambda1) (* (cos lambda2) (cos phi2))))))))) (* (cos lambda1) (* (cos lambda2) (cos phi2))))) (+ (* 1/6 (sin phi2)) (+ (* 1/2 (sin phi2)) (/ (* (sin phi2) (- (+ 1/2 (* -1 (* (pow (cos lambda1) 2) (* (pow (cos lambda2) 2) (pow (cos phi2) 2))))) (* 1/2 (cos (* 2 phi2))))) (* (pow (cos lambda1) 2) (* (pow (cos lambda2) 2) (pow (cos phi2) 2)))))))))))) (+ (* -1 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* -1 (/ (pow (sin phi2) 2) (* (cos lambda1) (* (cos lambda2) (cos phi2))))) (* 1/2 (/ 1 (* (cos lambda1) (* (cos lambda2) (cos phi2))))))))) (* -1 (sin phi2)))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))>
#<alt (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))>
#<alt (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))>
#<alt (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))>
#<alt (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))>
#<alt (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))>
#<alt (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))>
#<alt (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))>
#<alt (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2))))>
#<alt (+ (* phi2 (sin phi1)) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2)))))>
#<alt (+ (* phi2 (- (* phi2 (- (+ (* -3/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (+ (* -1/2 (* (cos phi1) (* (sin lambda1) (sin lambda2)))) (* 1/2 (/ (cos (* 2 phi1)) (* (cos lambda1) (* (cos lambda2) (cos phi1))))))) (+ (* -1 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (+ (* -1 (/ (pow (sin phi1) 2) (* (cos lambda1) (* (cos lambda2) (cos phi1))))) (* 1/2 (/ 1 (* (cos lambda1) (* (cos lambda2) (cos phi1))))))))) (* -1 (sin phi1)))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2)))))>
#<alt (+ (* phi2 (- (* phi2 (- (+ (* -3/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (+ (* -1/2 (* (cos phi1) (* (sin lambda1) (sin lambda2)))) (+ (* 1/2 (/ (cos (* 2 phi1)) (* (cos lambda1) (* (cos lambda2) (cos phi1))))) (* phi2 (- (/ (pow (sin phi1) 3) (* (pow (cos lambda1) 2) (* (pow (cos lambda2) 2) (pow (cos phi1) 2)))) (+ (* -1 (/ (* (sin phi1) (- (+ (* -3/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (* 1/2 (/ (cos (* 2 phi1)) (* (cos lambda1) (* (cos lambda2) (cos phi1)))))) (+ (* -1 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (+ (* -1 (/ (pow (sin phi1) 2) (* (cos lambda1) (* (cos lambda2) (cos phi1))))) (* 1/2 (/ 1 (* (cos lambda1) (* (cos lambda2) (cos phi1))))))))) (* (cos lambda1) (* (cos lambda2) (cos phi1))))) (+ (* 1/6 (sin phi1)) (+ (* 1/2 (sin phi1)) (/ (* (sin phi1) (- (+ 1/2 (* -1 (* (pow (cos lambda1) 2) (* (pow (cos lambda2) 2) (pow (cos phi1) 2))))) (* 1/2 (cos (* 2 phi1))))) (* (pow (cos lambda1) 2) (* (pow (cos lambda2) 2) (pow (cos phi1) 2)))))))))))) (+ (* -1 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (+ (* -1 (/ (pow (sin phi1) 2) (* (cos lambda1) (* (cos lambda2) (cos phi1))))) (* 1/2 (/ 1 (* (cos lambda1) (* (cos lambda2) (cos phi1))))))))) (* -1 (sin phi1)))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2)))))>
#<alt (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))>
#<alt (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))>
#<alt (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))>
#<alt (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))>
#<alt (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))>
#<alt (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))>
#<alt (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))>
#<alt (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))>
#<alt (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))>
#<alt (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))>
#<alt (+ (* lambda2 (+ (* lambda2 (- (* -3/2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (+ (/ (* (cos lambda1) (* (pow (sin phi1) 3) (* (pow (sin phi2) 3) (+ (* -1/2 (* (cos lambda1) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (* -1/2 (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))))))) (pow (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2)) (/ (* (pow (cos lambda1) 4) (* (pow (cos phi1) 3) (* (pow (cos phi2) 3) (+ (* -1/2 (* (cos lambda1) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (* -1/2 (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))))))) (pow (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))>
#<alt (+ (* lambda2 (+ (* lambda2 (- (+ (* -3/2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))))) (+ (/ (* (cos lambda1) (* (pow (sin phi1) 3) (* (pow (sin phi2) 3) (+ (* -1/2 (* (cos lambda1) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (* -1/2 (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))))))) (pow (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2)) (/ (* (pow (cos lambda1) 4) (* (pow (cos phi1) 3) (* (pow (cos phi2) 3) (+ (* -1/2 (* (cos lambda1) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (* -1/2 (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))))))) (pow (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))>
#<alt (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))>
#<alt (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))>
#<alt (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))>
#<alt (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))>
#<alt (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))>
#<alt (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))>
#<alt (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))>
#<alt (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))>
#<alt (+ (/ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))>
#<alt (+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (+ (/ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))>
#<alt (+ (* lambda1 (+ (* lambda1 (- (* -3/2 (/ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (+ (/ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (* (pow (cos phi2) 3) (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (* -1/2 (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))))))) (pow (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2)) (/ (* (pow (sin phi1) 3) (* (pow (sin phi2) 3) (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (* -1/2 (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))))))) (pow (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (/ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))>
#<alt (+ (* lambda1 (+ (* lambda1 (- (+ (* -3/2 (/ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))))) (+ (/ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (* (pow (cos phi2) 3) (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (* -1/2 (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))))))) (pow (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2)) (/ (* (pow (sin phi1) 3) (* (pow (sin phi2) 3) (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (* -1/2 (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))))))) (pow (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (/ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))>
#<alt (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))>
#<alt (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))>
#<alt (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))>
#<alt (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))>
#<alt (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))>
#<alt (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))>
#<alt (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))>
#<alt (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))>
#<alt (* (cos lambda1) (* (cos lambda2) (cos phi2)))>
#<alt (+ (* phi1 (sin phi2)) (* (cos lambda1) (* (cos lambda2) (cos phi2))))>
#<alt (+ (* phi1 (- (* phi1 (- (+ (* -3/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* 1/2 (/ (cos (* 2 phi2)) (* (cos lambda1) (* (cos lambda2) (cos phi2)))))) (+ (* -1 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* -1 (/ (pow (sin phi2) 2) (* (cos lambda1) (* (cos lambda2) (cos phi2))))) (* 1/2 (/ 1 (* (cos lambda1) (* (cos lambda2) (cos phi2))))))))) (* -1 (sin phi2)))) (* (cos lambda1) (* (cos lambda2) (cos phi2))))>
#<alt (+ (* phi1 (- (* phi1 (- (+ (* -3/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* 1/2 (/ (cos (* 2 phi2)) (* (cos lambda1) (* (cos lambda2) (cos phi2))))) (* phi1 (- (/ (pow (sin phi2) 3) (* (pow (cos lambda1) 2) (* (pow (cos lambda2) 2) (pow (cos phi2) 2)))) (+ (* -1 (/ (* (sin phi2) (- (+ (* -3/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* 1/2 (/ (cos (* 2 phi2)) (* (cos lambda1) (* (cos lambda2) (cos phi2)))))) (+ (* -1 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* -1 (/ (pow (sin phi2) 2) (* (cos lambda1) (* (cos lambda2) (cos phi2))))) (* 1/2 (/ 1 (* (cos lambda1) (* (cos lambda2) (cos phi2))))))))) (* (cos lambda1) (* (cos lambda2) (cos phi2))))) (+ (* 1/6 (sin phi2)) (+ (* 1/2 (sin phi2)) (/ (* (sin phi2) (- (+ 1/2 (* -1 (* (pow (cos lambda1) 2) (* (pow (cos lambda2) 2) (pow (cos phi2) 2))))) (* 1/2 (cos (* 2 phi2))))) (* (pow (cos lambda1) 2) (* (pow (cos lambda2) 2) (pow (cos phi2) 2))))))))))) (+ (* -1 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* -1 (/ (pow (sin phi2) 2) (* (cos lambda1) (* (cos lambda2) (cos phi2))))) (* 1/2 (/ 1 (* (cos lambda1) (* (cos lambda2) (cos phi2))))))))) (* -1 (sin phi2)))) (* (cos lambda1) (* (cos lambda2) (cos phi2))))>
#<alt (/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))>
#<alt (/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))>
#<alt (/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))>
#<alt (/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))>
#<alt (/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))>
#<alt (/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))>
#<alt (/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))>
#<alt (/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))>
#<alt (* (cos lambda1) (* (cos lambda2) (cos phi1)))>
#<alt (+ (* phi2 (sin phi1)) (* (cos lambda1) (* (cos lambda2) (cos phi1))))>
#<alt (+ (* phi2 (- (* phi2 (- (+ (* -3/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (* 1/2 (/ (cos (* 2 phi1)) (* (cos lambda1) (* (cos lambda2) (cos phi1)))))) (+ (* -1 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (+ (* -1 (/ (pow (sin phi1) 2) (* (cos lambda1) (* (cos lambda2) (cos phi1))))) (* 1/2 (/ 1 (* (cos lambda1) (* (cos lambda2) (cos phi1))))))))) (* -1 (sin phi1)))) (* (cos lambda1) (* (cos lambda2) (cos phi1))))>
#<alt (+ (* phi2 (- (* phi2 (- (+ (* -3/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (+ (* 1/2 (/ (cos (* 2 phi1)) (* (cos lambda1) (* (cos lambda2) (cos phi1))))) (* phi2 (- (/ (pow (sin phi1) 3) (* (pow (cos lambda1) 2) (* (pow (cos lambda2) 2) (pow (cos phi1) 2)))) (+ (* -1 (/ (* (sin phi1) (- (+ (* -3/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (* 1/2 (/ (cos (* 2 phi1)) (* (cos lambda1) (* (cos lambda2) (cos phi1)))))) (+ (* -1 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (+ (* -1 (/ (pow (sin phi1) 2) (* (cos lambda1) (* (cos lambda2) (cos phi1))))) (* 1/2 (/ 1 (* (cos lambda1) (* (cos lambda2) (cos phi1))))))))) (* (cos lambda1) (* (cos lambda2) (cos phi1))))) (+ (* 1/6 (sin phi1)) (+ (* 1/2 (sin phi1)) (/ (* (sin phi1) (- (+ 1/2 (* -1 (* (pow (cos lambda1) 2) (* (pow (cos lambda2) 2) (pow (cos phi1) 2))))) (* 1/2 (cos (* 2 phi1))))) (* (pow (cos lambda1) 2) (* (pow (cos lambda2) 2) (pow (cos phi1) 2))))))))))) (+ (* -1 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (+ (* -1 (/ (pow (sin phi1) 2) (* (cos lambda1) (* (cos lambda2) (cos phi1))))) (* 1/2 (/ 1 (* (cos lambda1) (* (cos lambda2) (cos phi1))))))))) (* -1 (sin phi1)))) (* (cos lambda1) (* (cos lambda2) (cos phi1))))>
#<alt (/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))>
#<alt (/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))>
#<alt (/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))>
#<alt (/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))>
#<alt (/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))>
#<alt (/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))>
#<alt (/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))>
#<alt (/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))>
#<alt (/ (+ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))>
#<alt (+ (* (pow lambda2 2) (- (* -3/2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (/ (* (cos lambda1) (* (+ (* -1/2 (* (cos lambda1) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (* -1/2 (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (+ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))))) (pow (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))>
#<alt (+ (* (pow lambda2 2) (- (+ (* -3/2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (* (pow lambda2 2) (- (* 7/8 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (+ (/ (* (cos lambda1) (* (+ (* -1/2 (* (cos lambda1) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (* -1/2 (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (- (* -3/2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (/ (* (cos lambda1) (* (+ (* -1/2 (* (cos lambda1) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (* -1/2 (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (+ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))))) (pow (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2))))) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (cos lambda1) (* (+ (* 1/24 (* (cos lambda1) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (+ (* 1/24 (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* 1/4 (* (cos lambda1) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))))) (+ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))))) (pow (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2)))))) (/ (* (cos lambda1) (* (+ (* -1/2 (* (cos lambda1) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (* -1/2 (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (+ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))))) (pow (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))>
#<alt (+ (* (pow lambda2 2) (- (+ (* -3/2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (* (pow lambda2 2) (- (+ (* 7/8 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (* (pow lambda2 2) (- (* -61/240 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (+ (/ (* (cos lambda1) (* (+ (* -1/2 (* (cos lambda1) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (* -1/2 (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (- (* 7/8 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (+ (/ (* (cos lambda1) (* (+ (* -1/2 (* (cos lambda1) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (* -1/2 (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (- (* -3/2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (/ (* (cos lambda1) (* (+ (* -1/2 (* (cos lambda1) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (* -1/2 (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (+ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))))) (pow (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2))))) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (cos lambda1) (* (+ (* 1/24 (* (cos lambda1) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (+ (* 1/24 (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* 1/4 (* (cos lambda1) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))))) (+ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))))) (pow (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2)))))) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (+ (/ (* (cos lambda1) (* (+ (* -1/24 (* (cos lambda1) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (+ (* -1/720 (* (cos lambda1) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (* -1/720 (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))))) (+ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))))) (pow (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2)) (/ (* (cos lambda1) (* (+ (* 1/24 (* (cos lambda1) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (+ (* 1/24 (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* 1/4 (* (cos lambda1) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))))) (- (* -3/2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (/ (* (cos lambda1) (* (+ (* -1/2 (* (cos lambda1) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (* -1/2 (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (+ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))))) (pow (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2))))) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))) (+ (/ (* (cos lambda1) (* (+ (* -1/2 (* (cos lambda1) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (* -1/2 (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (- (* -3/2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (/ (* (cos lambda1) (* (+ (* -1/2 (* (cos lambda1) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (* -1/2 (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (+ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))))) (pow (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2))))) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (cos lambda1) (* (+ (* 1/24 (* (cos lambda1) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (+ (* 1/24 (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* 1/4 (* (cos lambda1) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))))) (+ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))))) (pow (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2)))))) (/ (* (cos lambda1) (* (+ (* -1/2 (* (cos lambda1) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (* -1/2 (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (+ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))))) (pow (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))>
#<alt (/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))>
#<alt (/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))>
#<alt (/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))>
#<alt (/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))>
#<alt (/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))>
#<alt (/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))>
#<alt (/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))>
#<alt (/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))>
#<alt (/ (+ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))>
#<alt (+ (* (pow lambda1 2) (- (* -3/2 (/ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (/ (* (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (* -1/2 (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))))) (+ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (* (pow (sin phi1) 3) (pow (sin phi2) 3)))) (pow (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2)))) (+ (/ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))>
#<alt (+ (* (pow lambda1 2) (- (+ (* -3/2 (/ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (* (pow lambda1 2) (- (* 7/8 (/ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (+ (/ (* (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (* -1/2 (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))))) (- (* -3/2 (/ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (/ (* (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (* -1/2 (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))))) (+ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (* (pow (sin phi1) 3) (pow (sin phi2) 3)))) (pow (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2)))) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (+ (* 1/24 (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (+ (* 1/24 (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (* 1/4 (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))))) (+ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (* (pow (sin phi1) 3) (pow (sin phi2) 3)))) (pow (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2)))))) (/ (* (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (* -1/2 (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))))) (+ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (* (pow (sin phi1) 3) (pow (sin phi2) 3)))) (pow (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2)))) (+ (/ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))>
#<alt (+ (* (pow lambda1 2) (- (+ (* -3/2 (/ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (* (pow lambda1 2) (- (+ (* 7/8 (/ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (* (pow lambda1 2) (- (* -61/240 (/ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (+ (/ (* (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (* -1/2 (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))))) (- (* 7/8 (/ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (+ (/ (* (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (* -1/2 (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))))) (- (* -3/2 (/ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (/ (* (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (* -1/2 (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))))) (+ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (* (pow (sin phi1) 3) (pow (sin phi2) 3)))) (pow (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2)))) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (+ (* 1/24 (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (+ (* 1/24 (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (* 1/4 (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))))) (+ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (* (pow (sin phi1) 3) (pow (sin phi2) 3)))) (pow (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2))))) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (+ (/ (* (+ (* -1/24 (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (+ (* -1/720 (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (* -1/720 (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))))) (+ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (* (pow (sin phi1) 3) (pow (sin phi2) 3)))) (pow (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2)) (/ (* (+ (* 1/24 (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (+ (* 1/24 (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (* 1/4 (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))))) (- (* -3/2 (/ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (/ (* (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (* -1/2 (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))))) (+ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (* (pow (sin phi1) 3) (pow (sin phi2) 3)))) (pow (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2)))) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))) (+ (/ (* (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (* -1/2 (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))))) (- (* -3/2 (/ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (/ (* (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (* -1/2 (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))))) (+ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (* (pow (sin phi1) 3) (pow (sin phi2) 3)))) (pow (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2)))) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (+ (* 1/24 (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (+ (* 1/24 (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (* 1/4 (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))))) (+ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (* (pow (sin phi1) 3) (pow (sin phi2) 3)))) (pow (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2)))))) (/ (* (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (* -1/2 (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))))) (+ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (* (pow (sin phi1) 3) (pow (sin phi2) 3)))) (pow (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2)))) (+ (/ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))>
#<alt (/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))>
#<alt (/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))>
#<alt (/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))>
#<alt (/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))>
#<alt (/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))>
#<alt (/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))>
#<alt (/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))>
#<alt (/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))>
#<alt (* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))>
#<alt (* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))>
#<alt (* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))>
#<alt (* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))>
#<alt (* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))>
#<alt (* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))>
#<alt (* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))>
#<alt (* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))>
#<alt (* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))>
#<alt (* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))>
#<alt (* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))>
#<alt (* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))>
#<alt (* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))>
#<alt (* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))>
#<alt (* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))>
#<alt (* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))>
#<alt (* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))>
#<alt (* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))>
#<alt (* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))>
#<alt (* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))>
#<alt (* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))>
#<alt (* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))>
#<alt (* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))>
#<alt (* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))>
#<alt (* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))>
#<alt (* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))>
#<alt (* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))>
#<alt (* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))>
#<alt (* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))>
#<alt (* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))>
#<alt (* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))>
#<alt (* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))>
#<alt (* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))>
#<alt (* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))>
#<alt (* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))>
#<alt (acos (+ (cos lambda2) (* lambda1 (sin lambda2))))>
#<alt (acos (+ (cos lambda2) (* lambda1 (sin lambda2))))>
#<alt (acos (+ (cos lambda2) (* lambda1 (sin lambda2))))>
#<alt (acos (+ (cos lambda2) (* lambda1 (sin lambda2))))>
#<alt (acos (+ (cos lambda2) (* lambda1 (sin lambda2))))>
#<alt (acos (+ (cos lambda2) (* lambda1 (sin lambda2))))>
#<alt (acos (+ (cos lambda2) (* lambda1 (sin lambda2))))>
#<alt (acos (+ (cos lambda2) (* lambda1 (sin lambda2))))>
#<alt (acos (+ (cos lambda2) (* lambda1 (sin lambda2))))>
#<alt (acos (+ (cos lambda2) (* lambda1 (sin lambda2))))>
#<alt (acos (+ (cos lambda2) (* lambda1 (sin lambda2))))>
#<alt (acos (+ (cos lambda2) (* lambda1 (sin lambda2))))>
#<alt (acos (+ (cos lambda2) (* lambda1 (sin lambda2))))>
#<alt (acos (+ (cos lambda2) (* lambda1 (sin lambda2))))>
#<alt (acos (+ (cos lambda2) (* lambda1 (sin lambda2))))>
#<alt (acos (+ (cos lambda2) (* lambda1 (sin lambda2))))>
#<alt (acos (+ (cos lambda2) (* lambda1 (sin lambda2))))>
#<alt (acos (+ (cos lambda2) (* lambda1 (sin lambda2))))>
#<alt (acos (+ (cos lambda2) (* lambda1 (sin lambda2))))>
#<alt (acos (+ (cos lambda2) (* lambda1 (sin lambda2))))>
#<alt (acos (+ (cos lambda2) (* lambda1 (sin lambda2))))>
#<alt (acos (+ (cos lambda2) (* lambda1 (sin lambda2))))>
#<alt (acos (+ (cos lambda2) (* lambda1 (sin lambda2))))>
#<alt (acos (+ (cos lambda2) (* lambda1 (sin lambda2))))>
#<alt 1>
#<alt (+ 1 (* lambda1 lambda2))>
#<alt (+ 1 (* lambda2 (+ lambda1 (* -1/2 lambda2))))>
#<alt (+ 1 (* lambda2 (+ lambda1 (* lambda2 (- (* -1/6 (* lambda1 lambda2)) 1/2)))))>
#<alt (+ (cos lambda2) (* lambda1 (sin lambda2)))>
#<alt (+ (cos lambda2) (* lambda1 (sin lambda2)))>
#<alt (+ (cos lambda2) (* lambda1 (sin lambda2)))>
#<alt (+ (cos lambda2) (* lambda1 (sin lambda2)))>
#<alt (+ (cos lambda2) (* lambda1 (sin lambda2)))>
#<alt (+ (cos lambda2) (* lambda1 (sin lambda2)))>
#<alt (+ (cos lambda2) (* lambda1 (sin lambda2)))>
#<alt (+ (cos lambda2) (* lambda1 (sin lambda2)))>
#<alt (cos lambda2)>
#<alt (+ (cos lambda2) (* lambda1 (sin lambda2)))>
#<alt (+ (cos lambda2) (* lambda1 (sin lambda2)))>
#<alt (+ (cos lambda2) (* lambda1 (sin lambda2)))>
#<alt (* lambda1 (sin lambda2))>
#<alt (* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1)))>
#<alt (* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1)))>
#<alt (* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1)))>
#<alt (* lambda1 (sin lambda2))>
#<alt (* -1 (* lambda1 (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1)))))>
#<alt (* -1 (* lambda1 (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1)))))>
#<alt (* -1 (* lambda1 (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1)))))>
#<alt 1>
#<alt (+ 1 (* -1/2 (pow lambda2 2)))>
#<alt (+ 1 (* (pow lambda2 2) (- (* 1/24 (pow lambda2 2)) 1/2)))>
#<alt (+ 1 (* (pow lambda2 2) (- (* (pow lambda2 2) (+ 1/24 (* -1/720 (pow lambda2 2)))) 1/2)))>
#<alt (cos lambda2)>
#<alt (cos lambda2)>
#<alt (cos lambda2)>
#<alt (cos lambda2)>
#<alt (cos lambda2)>
#<alt (cos lambda2)>
#<alt (cos lambda2)>
#<alt (cos lambda2)>
#<alt (cos lambda1)>
#<alt (+ (cos lambda1) (* lambda2 (sin lambda1)))>
#<alt (+ (cos lambda1) (* lambda2 (+ (sin lambda1) (* -1/2 (* lambda2 (cos lambda1))))))>
#<alt (+ (cos lambda1) (* lambda2 (+ (sin lambda1) (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))))))>
#<alt (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))>
#<alt (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))>
#<alt (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))>
#<alt (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))>
#<alt (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))>
#<alt (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))>
#<alt (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))>
#<alt (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))>
#<alt (cos lambda2)>
#<alt (+ (cos lambda2) (* lambda1 (sin lambda2)))>
#<alt (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))>
#<alt (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))))))>
#<alt (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))>
#<alt (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))>
#<alt (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))>
#<alt (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))>
#<alt (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))>
#<alt (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))>
#<alt (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))>
#<alt (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))>
#<alt (* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))>
#<alt (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))>
#<alt (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))>
#<alt (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))>
#<alt (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))>
#<alt (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))>
#<alt (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))>
#<alt (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))>
#<alt (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))>
#<alt (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))>
#<alt (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))>
#<alt (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))>
#<alt (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))>
#<alt (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))>
#<alt (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))>
#<alt (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))>
#<alt (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))>
#<alt (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))>
#<alt (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))>
#<alt (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))>
#<alt (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))>
#<alt (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))>
#<alt (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))>
#<alt (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))>
#<alt (* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))>
#<alt (* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))>
#<alt (* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))>
#<alt (* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))>
#<alt (* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))>
#<alt (* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))>
#<alt (* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))>
#<alt (* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))>
#<alt (* -1 (* R (+ (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (* -1/2 (PI)))))>
#<alt (* -1 (* R (+ (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (* -1/2 (PI)))))>
#<alt (* -1 (* R (+ (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (* -1/2 (PI)))))>
#<alt (* -1 (* R (+ (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (* -1/2 (PI)))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (pow phi2 2)>
#<alt (* (pow phi2 2) (+ 1 (* -1/3 (pow phi2 2))))>
#<alt (* (pow phi2 2) (+ 1 (* (pow phi2 2) (- (* 2/45 (pow phi2 2)) 1/3))))>
#<alt (* (pow phi2 2) (+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 2/45 (* -1/315 (pow phi2 2)))) 1/3))))>
#<alt (- 1/2 (* 1/2 (cos (* 2 phi2))))>
#<alt (- 1/2 (* 1/2 (cos (* 2 phi2))))>
#<alt (- 1/2 (* 1/2 (cos (* 2 phi2))))>
#<alt (- 1/2 (* 1/2 (cos (* 2 phi2))))>
#<alt (- 1/2 (* 1/2 (cos (* 2 phi2))))>
#<alt (- 1/2 (* 1/2 (cos (* 2 phi2))))>
#<alt (- 1/2 (* 1/2 (cos (* 2 phi2))))>
#<alt (- 1/2 (* 1/2 (cos (* 2 phi2))))>
#<alt (pow phi1 2)>
#<alt (* (pow phi1 2) (+ 1 (* -1/3 (pow phi1 2))))>
#<alt (* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* 2/45 (pow phi1 2)) 1/3))))>
#<alt (* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 2/45 (* -1/315 (pow phi1 2)))) 1/3))))>
#<alt (- 1/2 (* 1/2 (cos (* 2 phi1))))>
#<alt (- 1/2 (* 1/2 (cos (* 2 phi1))))>
#<alt (- 1/2 (* 1/2 (cos (* 2 phi1))))>
#<alt (- 1/2 (* 1/2 (cos (* 2 phi1))))>
#<alt (- 1/2 (* 1/2 (cos (* 2 phi1))))>
#<alt (- 1/2 (* 1/2 (cos (* 2 phi1))))>
#<alt (- 1/2 (* 1/2 (cos (* 2 phi1))))>
#<alt (- 1/2 (* 1/2 (cos (* 2 phi1))))>
#<alt (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))>
#<alt (+ (* -3/2 (* (pow lambda2 2) (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))) (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))>
#<alt (+ (* (pow lambda2 2) (+ (* -3/2 (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* 7/8 (* (pow lambda2 2) (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))))) (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))>
#<alt (+ (* (pow lambda2 2) (+ (* -3/2 (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow lambda2 2) (+ (* -61/240 (* (pow lambda2 2) (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))) (* 7/8 (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))))))) (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))>
#<alt (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))>
#<alt (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))>
#<alt (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))>
#<alt (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))>
#<alt (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))>
#<alt (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))>
#<alt (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))>
#<alt (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))>
#<alt (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))>
#<alt (+ (* -3/2 (* (pow lambda1 2) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))>
#<alt (+ (* (pow lambda1 2) (+ (* -3/2 (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* 7/8 (* (pow lambda1 2) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))))) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))>
#<alt (+ (* (pow lambda1 2) (+ (* -3/2 (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow lambda1 2) (+ (* -61/240 (* (pow lambda1 2) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))) (* 7/8 (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))))))) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))>
#<alt (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))>
#<alt (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))>
#<alt (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))>
#<alt (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))>
#<alt (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))>
#<alt (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))>
#<alt (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))>
#<alt (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))>
#<alt (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (pow (cos phi2) 3)))>
#<alt (+ (* -3/2 (* (pow phi1 2) (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (pow (cos phi2) 3))))) (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (pow (cos phi2) 3))))>
#<alt (+ (* (pow phi1 2) (+ (* -3/2 (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (pow (cos phi2) 3)))) (* 7/8 (* (pow phi1 2) (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (pow (cos phi2) 3))))))) (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (pow (cos phi2) 3))))>
#<alt (+ (* (pow phi1 2) (+ (* -3/2 (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (pow (cos phi2) 3)))) (* (pow phi1 2) (+ (* -61/240 (* (pow phi1 2) (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (pow (cos phi2) 3))))) (* 7/8 (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (pow (cos phi2) 3)))))))) (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (pow (cos phi2) 3))))>
#<alt (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))>
#<alt (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))>
#<alt (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))>
#<alt (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))>
#<alt (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))>
#<alt (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))>
#<alt (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))>
#<alt (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))>
#<alt (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (pow (cos phi1) 3)))>
#<alt (+ (* -3/2 (* (pow phi2 2) (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (pow (cos phi1) 3))))) (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (pow (cos phi1) 3))))>
#<alt (+ (* (pow phi2 2) (+ (* -3/2 (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (pow (cos phi1) 3)))) (* 7/8 (* (pow phi2 2) (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (pow (cos phi1) 3))))))) (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (pow (cos phi1) 3))))>
#<alt (+ (* (pow phi2 2) (+ (* -3/2 (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (pow (cos phi1) 3)))) (* (pow phi2 2) (+ (* -61/240 (* (pow phi2 2) (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (pow (cos phi1) 3))))) (* 7/8 (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (pow (cos phi1) 3)))))))) (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (pow (cos phi1) 3))))>
#<alt (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))>
#<alt (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))>
#<alt (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))>
#<alt (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))>
#<alt (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))>
#<alt (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))>
#<alt (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))>
#<alt (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))>
#<alt (* lambda1 (sin lambda2))>
#<alt (* lambda1 (sin lambda2))>
#<alt (* lambda1 (sin lambda2))>
#<alt (* lambda1 (sin lambda2))>
#<alt (* lambda1 (sin lambda2))>
#<alt (* lambda1 (sin lambda2))>
#<alt (* lambda1 (sin lambda2))>
#<alt (* lambda1 (sin lambda2))>
#<alt (* lambda1 (sin lambda2))>
#<alt (* lambda1 (sin lambda2))>
#<alt (* lambda1 (sin lambda2))>
#<alt (* lambda1 (sin lambda2))>
#<alt (* lambda1 lambda2)>
#<alt (* lambda2 (+ lambda1 (* -1/6 (* lambda1 (pow lambda2 2)))))>
#<alt (* lambda2 (+ lambda1 (* (pow lambda2 2) (+ (* -1/6 lambda1) (* 1/120 (* lambda1 (pow lambda2 2)))))))>
#<alt (* lambda2 (+ lambda1 (* (pow lambda2 2) (+ (* -1/6 lambda1) (* (pow lambda2 2) (+ (* -1/5040 (* lambda1 (pow lambda2 2))) (* 1/120 lambda1)))))))>
#<alt (* lambda1 (sin lambda2))>
#<alt (* lambda1 (sin lambda2))>
#<alt (* lambda1 (sin lambda2))>
#<alt (* lambda1 (sin lambda2))>
#<alt (* lambda1 (sin lambda2))>
#<alt (* lambda1 (sin lambda2))>
#<alt (* lambda1 (sin lambda2))>
#<alt (* lambda1 (sin lambda2))>
#<alt (* lambda1 (sin lambda2))>
#<alt (* lambda1 (+ (sin lambda2) (* -1/6 (* (pow lambda1 2) (sin lambda2)))))>
#<alt (* lambda1 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/6 (sin lambda2)) (* 1/120 (* (pow lambda1 2) (sin lambda2)))))))>
#<alt (* lambda1 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/6 (sin lambda2)) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (sin lambda2))) (* 1/120 (sin lambda2))))))))>
#<alt (* (sin lambda1) (sin lambda2))>
#<alt (* (sin lambda1) (sin lambda2))>
#<alt (* (sin lambda1) (sin lambda2))>
#<alt (* (sin lambda1) (sin lambda2))>
#<alt (* (sin lambda1) (sin lambda2))>
#<alt (* (sin lambda1) (sin lambda2))>
#<alt (* (sin lambda1) (sin lambda2))>
#<alt (* (sin lambda1) (sin lambda2))>
#<alt (* lambda2 (sin lambda1))>
#<alt (* lambda2 (+ (sin lambda1) (* -1/6 (* (pow lambda2 2) (sin lambda1)))))>
#<alt (* lambda2 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/6 (sin lambda1)) (* 1/120 (* (pow lambda2 2) (sin lambda1)))))))>
#<alt (* lambda2 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/6 (sin lambda1)) (* (pow lambda2 2) (+ (* -1/5040 (* (pow lambda2 2) (sin lambda1))) (* 1/120 (sin lambda1))))))))>
#<alt (* (sin lambda1) (sin lambda2))>
#<alt (* (sin lambda1) (sin lambda2))>
#<alt (* (sin lambda1) (sin lambda2))>
#<alt (* (sin lambda1) (sin lambda2))>
#<alt (* (sin lambda1) (sin lambda2))>
#<alt (* (sin lambda1) (sin lambda2))>
#<alt (* (sin lambda1) (sin lambda2))>
#<alt (* (sin lambda1) (sin lambda2))>
#<alt 1>
#<alt (+ 1 (* -1/2 (pow lambda1 2)))>
#<alt (+ 1 (* (pow lambda1 2) (- (* 1/24 (pow lambda1 2)) 1/2)))>
#<alt (+ 1 (* (pow lambda1 2) (- (* (pow lambda1 2) (+ 1/24 (* -1/720 (pow lambda1 2)))) 1/2)))>
#<alt (cos lambda1)>
#<alt (cos lambda1)>
#<alt (cos lambda1)>
#<alt (cos lambda1)>
#<alt (cos lambda1)>
#<alt (cos lambda1)>
#<alt (cos lambda1)>
#<alt (cos lambda1)>
Calls

150 calls:

TimeVariablePointExpression
43.0ms
lambda1
@inf
(+ (/ (+ (pow (* (sin phi1) (sin phi2)) 3) (pow (* (cos lambda2) (* (cos lambda1) (* (cos phi1) (cos phi2)))) 3)) (+ (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))) (* (* (cos lambda2) (* (cos lambda1) (* (cos phi1) (cos phi2)))) (- (* (cos lambda2) (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))))) (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
8.0ms
phi1
@inf
(+ (/ (+ (pow (* (sin phi1) (sin phi2)) 3) (pow (* (cos lambda2) (* (cos lambda1) (* (cos phi1) (cos phi2)))) 3)) (+ (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))) (* (* (cos lambda2) (* (cos lambda1) (* (cos phi1) (cos phi2)))) (- (* (cos lambda2) (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))))) (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
8.0ms
phi2
@inf
(+ (/ (+ (pow (* (sin phi1) (sin phi2)) 3) (pow (* (cos lambda2) (* (cos lambda1) (* (cos phi1) (cos phi2)))) 3)) (+ (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))) (* (* (cos lambda2) (* (cos lambda1) (* (cos phi1) (cos phi2)))) (- (* (cos lambda2) (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))))) (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
8.0ms
phi1
@-inf
(+ (/ (+ (pow (* (sin phi1) (sin phi2)) 3) (pow (* (cos lambda2) (* (cos lambda1) (* (cos phi1) (cos phi2)))) 3)) (+ (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))) (* (* (cos lambda2) (* (cos lambda1) (* (cos phi1) (cos phi2)))) (- (* (cos lambda2) (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))))) (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
8.0ms
lambda2
@inf
(+ (/ (+ (pow (* (sin phi1) (sin phi2)) 3) (pow (* (cos lambda2) (* (cos lambda1) (* (cos phi1) (cos phi2)))) 3)) (+ (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))) (* (* (cos lambda2) (* (cos lambda1) (* (cos phi1) (cos phi2)))) (- (* (cos lambda2) (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))))) (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))

rewrite411.0ms (1.7%)

Memory
16.9MiB live, 677.9MiB allocated
Algorithm
1×batch-egg-rewrite
Rules
4 986×accelerator-lowering-fma.f32
4 986×accelerator-lowering-fma.f64
4 810×*-lowering-*.f32
4 810×*-lowering-*.f64
3 048×pow-lowering-pow.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
067434
1379209
23394209
08183198
Stop Event
1×iter limit
1×node limit
Counts
23 → 512
Calls
Call 1
Inputs
(* (acos (+ (/ (+ (pow (* (sin phi1) (sin phi2)) 3) (pow (* (cos lambda2) (* (cos lambda1) (* (cos phi1) (cos phi2)))) 3)) (+ (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))) (* (* (cos lambda2) (* (cos lambda1) (* (cos phi1) (cos phi2)))) (- (* (cos lambda2) (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))))) (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))) R)
(acos (+ (/ (+ (pow (* (sin phi1) (sin phi2)) 3) (pow (* (cos lambda2) (* (cos lambda1) (* (cos phi1) (cos phi2)))) 3)) (+ (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))) (* (* (cos lambda2) (* (cos lambda1) (* (cos phi1) (cos phi2)))) (- (* (cos lambda2) (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))))) (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2))))))
(+ (/ (+ (pow (* (sin phi1) (sin phi2)) 3) (pow (* (cos lambda2) (* (cos lambda1) (* (cos phi1) (cos phi2)))) 3)) (+ (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))) (* (* (cos lambda2) (* (cos lambda1) (* (cos phi1) (cos phi2)))) (- (* (cos lambda2) (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))))) (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
(/ (+ (pow (* (sin phi1) (sin phi2)) 3) (pow (* (cos lambda2) (* (cos lambda1) (* (cos phi1) (cos phi2)))) 3)) (+ (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))) (* (* (cos lambda2) (* (cos lambda1) (* (cos phi1) (cos phi2)))) (- (* (cos lambda2) (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))
(* lambda1 R)
(* (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))) R)
(acos (+ (cos lambda2) (* lambda1 (sin lambda2))))
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(cos lambda2)
(+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))
(* (acos (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) R)
(acos (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))
(cbrt (* (PI) (* (PI) (PI))))
(+ (* (/ (cbrt (* (PI) (* (PI) (PI)))) 2) R) (* (- 0 (asin (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))) R))
(/ (cbrt (* (PI) (* (PI) (PI)))) 2)
(* (PI) (* (PI) (PI)))
(- 1/2 (* 1/2 (cos (* 2 phi2))))
(- 1/2 (* 1/2 (cos (* 2 phi1))))
(pow (* (cos lambda2) (* (cos lambda1) (* (cos phi1) (cos phi2)))) 3)
(* lambda1 (sin lambda2))
(* (sin lambda1) (sin lambda2))
(cos lambda1)
(PI)
Outputs
(*.f64 (acos.f64 (+.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 R (acos.f64 (+.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
(acos.f64 (+.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (asin.f64 (+.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
(fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 (asin.f64 (+.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))))
(fma.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal -1 binary64)) (neg.f64 (asin.f64 (+.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (+.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))))
(fma.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (asin.f64 (+.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))))
(fma.f64 (cbrt.f64 (PI.f64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (+.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))))
(fma.f64 (cbrt.f64 (PI.f64)) (/.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) #s(literal 2 binary64)) (neg.f64 (asin.f64 (+.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))))
(fma.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (+.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))))
(fma.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (asin.f64 (+.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))))
(fma.f64 (sqrt.f64 (PI.f64)) (*.f64 (sqrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (+.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))))
(fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (asin.f64 (+.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))))
(fma.f64 (-.f64 #s(literal 0 binary64) (PI.f64)) #s(literal -1/2 binary64) (neg.f64 (asin.f64 (+.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))))
(/.f64 (-.f64 (/.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal 8 binary64)) (pow.f64 (asin.f64 (+.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (pow.f64 (asin.f64 (+.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) #s(literal 2 binary64)) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))))))
(/.f64 (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (asin.f64 (+.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) #s(literal 2 binary64))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))))
(+.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2))))
(-.f64 (/.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2))) #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))) (-.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2))))
(fma.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(fma.f64 (+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))) (*.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(fma.f64 (+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))) (/.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2))) (+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2))))
(fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2))))
(fma.f64 #s(literal 1 binary64) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(fma.f64 (-.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(fma.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) #s(literal 3 binary64))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(fma.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) #s(literal 3 binary64)))) #s(literal -1 binary64)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi1)) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2))))
(fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2))))
(fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (sin.f64 lambda2) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2))))
(fma.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 6 binary64)))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(fma.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) #s(literal 3 binary64))) (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64)))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(fma.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 9 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) #s(literal 9 binary64)))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 6 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) #s(literal 6 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)))) #s(literal 3 binary64))))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(fma.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))) (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) #s(literal 6 binary64)))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) #s(literal 3 binary64)))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)))))) (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (-.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2))) #s(literal 2 binary64)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))))))
(/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)))))))
(/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))) (-.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2))) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))))
(/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2))) #s(literal 2 binary64)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))) (-.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2))) #s(literal 2 binary64)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))))) (neg.f64 (-.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))) (pow.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2))) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)))))
(pow.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)))))) (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (-.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2))) #s(literal 2 binary64)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))))) #s(literal -1 binary64))
(*.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2))))))))
(*.f64 (-.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2))) #s(literal 2 binary64)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)))
(+.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2))))) #s(literal -1 binary64)))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 lambda1) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 lambda2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (cos.f64 lambda1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (exp.f64 (log.f64 (sin.f64 phi1))) (exp.f64 (log.f64 (sin.f64 phi2))) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)))
(fma.f64 (exp.f64 (log.f64 (sin.f64 phi2))) (exp.f64 (log.f64 (sin.f64 phi1))) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)))
(fma.f64 (exp.f64 (log.f64 (cos.f64 lambda2))) (exp.f64 (log.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (exp.f64 (log.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (exp.f64 (log.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (exp.f64 (log.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))))) (exp.f64 (log.f64 (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(neg.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) #s(literal 3 binary64))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))
(neg.f64 (/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) #s(literal 3 binary64)))) (+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)))) #s(literal 1 binary64)))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) #s(literal 3 binary64)))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 9 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) #s(literal 9 binary64))) (*.f64 (+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 6 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) #s(literal 6 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)))) #s(literal 3 binary64))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) #s(literal 6 binary64))) (*.f64 (+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))) (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) #s(literal 3 binary64)))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))) (-.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2))))))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 9 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) #s(literal 9 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 6 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) #s(literal 6 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)))) #s(literal 3 binary64)))) (+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) #s(literal 6 binary64))) #s(literal 1 binary64)) (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) #s(literal 3 binary64))) #s(literal 1 binary64)) (+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) #s(literal 3 binary64))))) (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))
(/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2))))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 9 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) #s(literal 9 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 6 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) #s(literal 6 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)))) #s(literal 3 binary64)))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) #s(literal 6 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))) (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) #s(literal 3 binary64))))
(pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)))) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))))
(*.f64 (+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))) (*.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))
(*.f64 (+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))) (/.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2))) (+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))))
(*.f64 #s(literal 1 binary64) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2))))
(*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))
(*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) #s(literal 3 binary64))))
(*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) #s(literal 3 binary64)))) #s(literal -1 binary64)))
(*.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 6 binary64)))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))
(*.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) #s(literal 3 binary64))) (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64)))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(*.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 9 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) #s(literal 9 binary64)))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 6 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) #s(literal 6 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)))) #s(literal 3 binary64))))))
(*.f64 (pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))) (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) #s(literal 6 binary64)))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) #s(literal 3 binary64)))))
(*.f64 lambda1 R)
(*.f64 R lambda1)
(*.f64 R (acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))))
(*.f64 (acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))) R)
(acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (asin.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))))
(fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 (asin.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))))
(fma.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal -1 binary64)) (neg.f64 (asin.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))))
(fma.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (asin.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))))
(fma.f64 (cbrt.f64 (PI.f64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))))
(fma.f64 (cbrt.f64 (PI.f64)) (/.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) #s(literal 2 binary64)) (neg.f64 (asin.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))))
(fma.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))))
(fma.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (asin.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))))
(fma.f64 (sqrt.f64 (PI.f64)) (*.f64 (sqrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))))
(fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (asin.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))))
(fma.f64 (-.f64 #s(literal 0 binary64) (PI.f64)) #s(literal -1/2 binary64) (neg.f64 (asin.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))))
(/.f64 (-.f64 (/.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal 8 binary64)) (pow.f64 (asin.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (pow.f64 (asin.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))) #s(literal 2 binary64)) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))))))
(/.f64 (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (asin.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))) #s(literal 2 binary64))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))))
(+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))
(+.f64 (*.f64 lambda1 (sin.f64 lambda2)) (cos.f64 lambda2))
(-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))) (/.f64 (*.f64 (*.f64 lambda1 lambda1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (-.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))))
(fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2))
(fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 lambda1 (sin.f64 lambda2)) (-.f64 (*.f64 lambda1 (sin.f64 lambda2)) (cos.f64 lambda2)))) (+.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (*.f64 lambda1 (sin.f64 lambda2)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 lambda1 lambda1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))))))
(/.f64 (+.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (*.f64 lambda1 (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 lambda1 (sin.f64 lambda2)) (-.f64 (*.f64 lambda1 (sin.f64 lambda2)) (cos.f64 lambda2)))))
(/.f64 (+.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (*.f64 lambda1 (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 lambda1 lambda1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 lambda1 lambda1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))))) (-.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (*.f64 lambda1 (sin.f64 lambda2)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 lambda1 (sin.f64 lambda2)) (-.f64 (*.f64 lambda1 (sin.f64 lambda2)) (cos.f64 lambda2))))))
(/.f64 (neg.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 lambda1 lambda1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))))) (neg.f64 (-.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))))
(/.f64 (-.f64 (*.f64 (*.f64 lambda1 lambda1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (-.f64 (*.f64 lambda1 (sin.f64 lambda2)) (cos.f64 lambda2)))
(pow.f64 (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 lambda1 (sin.f64 lambda2)) (-.f64 (*.f64 lambda1 (sin.f64 lambda2)) (cos.f64 lambda2)))) (+.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (*.f64 lambda1 (sin.f64 lambda2)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 lambda1 lambda1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))))) #s(literal -1 binary64))
(*.f64 (+.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (*.f64 lambda1 (sin.f64 lambda2)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 lambda1 (sin.f64 lambda2)) (-.f64 (*.f64 lambda1 (sin.f64 lambda2)) (cos.f64 lambda2))))))
(*.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 lambda1 lambda1) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))))) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))))
(+.f64 (*.f64 (cos.f64 #s(literal 0 binary64)) (cos.f64 lambda2)) (*.f64 (sin.f64 #s(literal 0 binary64)) (sin.f64 lambda2)))
(cos.f64 lambda2)
(cos.f64 (-.f64 #s(literal 0 binary64) lambda2))
(fma.f64 (cos.f64 #s(literal 0 binary64)) (cos.f64 lambda2) (*.f64 (sin.f64 #s(literal 0 binary64)) (sin.f64 lambda2)))
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(+.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+.f64 (*.f64 (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda2 lambda1))))) (cos.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda2 lambda1)))))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda2 lambda1))))) (sin.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda2 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)))))
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))))
(-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)) (sin.f64 lambda1)))
(-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (cos.f64 (+.f64 lambda2 lambda1))))
(-.f64 (*.f64 (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (cos.f64 (neg.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1))))) (*.f64 (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (sin.f64 (neg.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1))))))
(-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 (neg.f64 lambda1))) (*.f64 (sin.f64 lambda2) (sin.f64 (neg.f64 lambda1))))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(fma.f64 (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(fma.f64 (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))))
(fma.f64 (cos.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda2 lambda1))))) (cos.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda2 lambda1))))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda2 lambda1))))) (sin.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda2 lambda1)))))))
(fma.f64 (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 lambda2 lambda1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (cos.f64 (+.f64 lambda2 lambda1)))
(/.f64 (+.f64 (*.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))))) #s(literal 4 binary64))
(/.f64 (+.f64 (*.f64 (+.f64 (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 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))
(/.f64 (neg.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) (neg.f64 (cos.f64 (+.f64 lambda2 lambda1))))
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))))) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))
(pow.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (cos.f64 (+.f64 lambda2 lambda1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) #s(literal -1 binary64))
(*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda2 lambda1))))
(*.f64 R (-.f64 lambda2 lambda1))
(*.f64 (-.f64 lambda2 lambda1) R)
(acos.f64 (cos.f64 (-.f64 lambda2 lambda1)))
(+.f64 lambda2 (neg.f64 lambda1))
(+.f64 lambda1 (-.f64 #s(literal 0 binary64) lambda2))
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1))))
(+.f64 (-.f64 #s(literal 0 binary64) lambda2) lambda1)
(fabs.f64 (remainder.f64 (-.f64 lambda2 lambda1) (*.f64 #s(literal 2 binary64) (PI.f64))))
(-.f64 lambda2 lambda1)
(-.f64 lambda1 lambda2)
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))
(-.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda2 lambda1)))) (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda2 lambda1)))))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1)) (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1)))
(fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1))))
(fma.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal -1 binary64)) (neg.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1))))
(fma.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1))))
(fma.f64 (cbrt.f64 (PI.f64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1))))
(fma.f64 (cbrt.f64 (PI.f64)) (/.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) #s(literal 2 binary64)) (neg.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1))))
(fma.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1))))
(fma.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1))))
(fma.f64 (sqrt.f64 (PI.f64)) (*.f64 (sqrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1))))
(fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1))))
(fma.f64 (-.f64 #s(literal 0 binary64) (PI.f64)) #s(literal -1/2 binary64) (neg.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1))))
(fma.f64 #s(literal -1 binary64) lambda2 lambda1)
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda2 lambda1) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))))
(/.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda2 lambda1))))
(/.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (+.f64 (*.f64 lambda1 lambda1) (-.f64 (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 #s(literal 0 binary64) lambda2)) (*.f64 lambda1 (-.f64 #s(literal 0 binary64) lambda2)))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda2 lambda1))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2)))) (neg.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda2 lambda1)))))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (neg.f64 (+.f64 lambda2 lambda1)))
(/.f64 (-.f64 (/.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal 8 binary64)) (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)) (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1))))) (+.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1))) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1))))))
(/.f64 (-.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (*.f64 lambda1 (*.f64 lambda1 lambda1))) (+.f64 (*.f64 lambda2 lambda2) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda1))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 #s(literal 0 binary64) lambda2))) (-.f64 lambda1 (-.f64 #s(literal 0 binary64) lambda2)))
(/.f64 (-.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)) (+.f64 lambda2 lambda1))
(/.f64 (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1))))
(pow.f64 (/.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 lambda2 lambda1) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) #s(literal -1 binary64))
(*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda2 lambda1)))))
(*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)))
(PI.f64)
(log.f64 (exp.f64 (PI.f64)))
(exp.f64 (log.f64 (PI.f64)))
(exp.f64 (*.f64 (*.f64 #s(literal 1/3 binary64) (log.f64 (PI.f64))) #s(literal 3 binary64)))
(exp.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (PI.f64))) #s(literal 2 binary64)))
(sqrt.f64 (*.f64 (PI.f64) (PI.f64)))
(cbrt.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))))
(pow.f64 (PI.f64) #s(literal 1 binary64))
(pow.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/2 binary64))
(pow.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal 1/3 binary64))
(pow.f64 (cbrt.f64 (PI.f64)) #s(literal 3 binary64))
(pow.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64)))) #s(literal 1/6 binary64))
(pow.f64 (E.f64) (log.f64 (PI.f64)))
(pow.f64 (exp.f64 #s(literal 1/3 binary64)) (*.f64 #s(literal 3 binary64) (log.f64 (PI.f64))))
(*.f64 (PI.f64) #s(literal 1 binary64))
(*.f64 (PI.f64) (log.f64 (E.f64)))
(*.f64 #s(literal 1 binary64) (PI.f64))
(*.f64 (cbrt.f64 (PI.f64)) (pow.f64 (PI.f64) #s(literal 2/3 binary64)))
(*.f64 (cbrt.f64 (PI.f64)) (log.f64 (exp.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)))))
(*.f64 (cbrt.f64 (PI.f64)) (sqrt.f64 (pow.f64 (PI.f64) #s(literal 4/3 binary64))))
(*.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (cbrt.f64 (PI.f64)))
(*.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (log.f64 (exp.f64 (cbrt.f64 (PI.f64)))))
(*.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (pow.f64 (pow.f64 (PI.f64) #s(literal 1/6 binary64)) #s(literal 2 binary64)))
(*.f64 (sqrt.f64 (PI.f64)) (sqrt.f64 (PI.f64)))
(*.f64 (sqrt.f64 (PI.f64)) (log.f64 (exp.f64 (sqrt.f64 (PI.f64)))))
(*.f64 (cbrt.f64 (cbrt.f64 (PI.f64))) (pow.f64 (pow.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 4/3 binary64)) #s(literal 1/3 binary64)))
(*.f64 (cbrt.f64 (cbrt.f64 (PI.f64))) (cbrt.f64 (pow.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 4/3 binary64))))
(*.f64 (pow.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) #s(literal 1/3 binary64)) (pow.f64 (pow.f64 (PI.f64) #s(literal 7/3 binary64)) #s(literal 1/3 binary64)))
(*.f64 (pow.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) #s(literal 1/3 binary64)) (cbrt.f64 (pow.f64 (PI.f64) #s(literal 7/3 binary64))))
(*.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 1/3 binary64)) (pow.f64 (pow.f64 (PI.f64) #s(literal 5/2 binary64)) #s(literal 1/3 binary64)))
(*.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 1/3 binary64)) (cbrt.f64 (pow.f64 (PI.f64) #s(literal 5/2 binary64))))
(*.f64 (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (sqrt.f64 (*.f64 (PI.f64) (pow.f64 (PI.f64) #s(literal 2/3 binary64)))))
(*.f64 (pow.f64 (PI.f64) #s(literal 1/4 binary64)) (sqrt.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64))))
(*.f64 (pow.f64 #s(literal 1 binary64) #s(literal 1/3 binary64)) (PI.f64))
(*.f64 (pow.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) #s(literal 1/3 binary64)) (pow.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) #s(literal 1/3 binary64)))
(*.f64 (pow.f64 (pow.f64 (PI.f64) #s(literal 7/3 binary64)) #s(literal 1/3 binary64)) (pow.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) #s(literal 1/3 binary64)))
(*.f64 (pow.f64 (pow.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 4/3 binary64)) #s(literal 1/3 binary64)) (cbrt.f64 (cbrt.f64 (PI.f64))))
(*.f64 (pow.f64 (pow.f64 (PI.f64) #s(literal 5/2 binary64)) #s(literal 1/3 binary64)) (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 1/3 binary64)))
(*.f64 (pow.f64 (cbrt.f64 (cbrt.f64 (PI.f64))) #s(literal 3 binary64)) (pow.f64 (pow.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) #s(literal 1/3 binary64)) #s(literal 3 binary64)))
(*.f64 (pow.f64 (pow.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) #s(literal 1/3 binary64)) #s(literal 3 binary64)) (pow.f64 (cbrt.f64 (cbrt.f64 (PI.f64))) #s(literal 3 binary64)))
(*.f64 (pow.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 1/3 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 1/3 binary64)) #s(literal 3 binary64)))
(*.f64 (pow.f64 (pow.f64 (PI.f64) #s(literal 1/6 binary64)) #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2/3 binary64)))
(*.f64 (exp.f64 (*.f64 #s(literal 1/3 binary64) (log.f64 (PI.f64)))) (exp.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) (log.f64 (PI.f64))))))
(*.f64 (exp.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) (log.f64 (PI.f64))))) (exp.f64 (*.f64 #s(literal 1/3 binary64) (log.f64 (PI.f64)))))
(*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (PI.f64)))) (exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (PI.f64)))))
(*.f64 (cbrt.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64))) (cbrt.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64))))
(*.f64 (cbrt.f64 (pow.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 4/3 binary64))) (cbrt.f64 (cbrt.f64 (PI.f64))))
(*.f64 (cbrt.f64 (pow.f64 (PI.f64) #s(literal 7/3 binary64))) (pow.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) #s(literal 1/3 binary64)))
(*.f64 (cbrt.f64 (pow.f64 (PI.f64) #s(literal 5/2 binary64))) (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 1/3 binary64)))
(*.f64 (sqrt.f64 (*.f64 (PI.f64) (pow.f64 (PI.f64) #s(literal 2/3 binary64)))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)))
(*.f64 (sqrt.f64 (pow.f64 (PI.f64) #s(literal 4/3 binary64))) (cbrt.f64 (PI.f64)))
(*.f64 (sqrt.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64))) (pow.f64 (PI.f64) #s(literal 1/4 binary64)))
(+.f64 (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))) (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))) R)))
(+.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))))
(-.f64 (/.f64 (/.f64 (*.f64 (*.f64 R (PI.f64)) (*.f64 R (PI.f64))) #s(literal 4 binary64)) (*.f64 R (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))))))) (/.f64 (pow.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) #s(literal 2 binary64)) (*.f64 R (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))))))))
(fma.f64 R (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))))) (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))))
(fma.f64 R (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))) R)))
(fma.f64 (PI.f64) (*.f64 #s(literal 1/2 binary64) R) (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))) R)))
(fma.f64 (PI.f64) (/.f64 R #s(literal 2 binary64)) (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))) R)))
(fma.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))))) R (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))))
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))) R)))
(fma.f64 (*.f64 R (PI.f64)) #s(literal 1/2 binary64) (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))) R)))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (/.f64 (*.f64 (*.f64 R (PI.f64)) (*.f64 R (PI.f64))) #s(literal 4 binary64)) (*.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) (-.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64)))))) (+.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 R (*.f64 R R))) #s(literal 8 binary64)) (neg.f64 (pow.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))) R) #s(literal 3 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 R (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))))))) (-.f64 (/.f64 (*.f64 (*.f64 R (PI.f64)) (*.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) #s(literal 2 binary64)))))
(/.f64 (+.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 R (*.f64 R R))) #s(literal 8 binary64)) (neg.f64 (pow.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))) R) #s(literal 3 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 R (PI.f64)) (*.f64 R (PI.f64))) #s(literal 4 binary64)) (*.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) (-.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64)))))))
(/.f64 (+.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 R (*.f64 R R))) #s(literal 8 binary64)) (neg.f64 (pow.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))) R) #s(literal 3 binary64)))) (+.f64 (pow.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 R (PI.f64)) (*.f64 R (PI.f64))) #s(literal 4 binary64)) (*.f64 (*.f64 (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))) R) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))))))))
(/.f64 (-.f64 (/.f64 (*.f64 (*.f64 R (PI.f64)) (*.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) #s(literal 2 binary64))) (*.f64 R (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))))))))
(/.f64 (neg.f64 (+.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 R (*.f64 R R))) #s(literal 8 binary64)) (neg.f64 (pow.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))) R) #s(literal 3 binary64))))) (neg.f64 (+.f64 (/.f64 (*.f64 (*.f64 R (PI.f64)) (*.f64 R (PI.f64))) #s(literal 4 binary64)) (*.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) (-.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))))))))
(/.f64 (neg.f64 (-.f64 (/.f64 (*.f64 (*.f64 R (PI.f64)) (*.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) #s(literal 2 binary64)))) (neg.f64 (*.f64 R (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))))))))
(/.f64 (-.f64 (pow.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 R (PI.f64)) (*.f64 R (PI.f64))) #s(literal 4 binary64))) (-.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64)))))
(pow.f64 (/.f64 (+.f64 (/.f64 (*.f64 (*.f64 R (PI.f64)) (*.f64 R (PI.f64))) #s(literal 4 binary64)) (*.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) (-.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64)))))) (+.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 R (*.f64 R R))) #s(literal 8 binary64)) (neg.f64 (pow.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))) R) #s(literal 3 binary64))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 R (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))))))) (-.f64 (/.f64 (*.f64 (*.f64 R (PI.f64)) (*.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) #s(literal 2 binary64)))) #s(literal -1 binary64))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))))
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(*.f64 (+.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 R (*.f64 R R))) #s(literal 8 binary64)) (neg.f64 (pow.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))) R) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 R (PI.f64)) (*.f64 R (PI.f64))) #s(literal 4 binary64)) (*.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) (-.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))))))))
(*.f64 (-.f64 (/.f64 (*.f64 (*.f64 R (PI.f64)) (*.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 R (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))))))))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (PI.f64))) #s(literal -1 binary64)))
(neg.f64 (/.f64 (PI.f64) #s(literal -2 binary64)))
(/.f64 (PI.f64) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (PI.f64)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 2 binary64) (PI.f64)) #s(literal 1 binary64)))
(/.f64 (-.f64 #s(literal 0 binary64) (PI.f64)) #s(literal -2 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 2 binary64) (PI.f64))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (PI.f64))) #s(literal 2 binary64))
(pow.f64 (/.f64 #s(literal 2 binary64) (PI.f64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 #s(literal 2 binary64) (PI.f64)) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 #s(literal 1/2 binary64) (PI.f64))
(*.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal -1 binary64)))
(*.f64 (PI.f64) #s(literal 1/2 binary64))
(*.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)))
(*.f64 (cbrt.f64 (PI.f64)) (*.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) #s(literal 1/2 binary64)))
(*.f64 (cbrt.f64 (PI.f64)) (/.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) #s(literal 2 binary64)))
(*.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)))
(*.f64 (sqrt.f64 (PI.f64)) (*.f64 (sqrt.f64 (PI.f64)) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)))
(*.f64 (-.f64 #s(literal 0 binary64) (PI.f64)) #s(literal -1/2 binary64))
(exp.f64 (*.f64 #s(literal 3 binary64) (log.f64 (PI.f64))))
(exp.f64 (*.f64 (*.f64 #s(literal 3 binary64) (log.f64 (PI.f64))) #s(literal 1 binary64)))
(exp.f64 (+.f64 (log.f64 (PI.f64)) (*.f64 (log.f64 (PI.f64)) #s(literal 2 binary64))))
(exp.f64 (+.f64 (*.f64 (log.f64 (PI.f64)) #s(literal 2 binary64)) (log.f64 (PI.f64))))
(cbrt.f64 (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))))))
(cbrt.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64)))))
(pow.f64 (PI.f64) #s(literal 3 binary64))
(pow.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 3/2 binary64))
(pow.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal 1 binary64))
(pow.f64 (cbrt.f64 (PI.f64)) #s(literal 9 binary64))
(pow.f64 (sqrt.f64 (PI.f64)) #s(literal 6 binary64))
(pow.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))))) #s(literal 1/3 binary64))
(pow.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64)))) #s(literal 1/3 binary64))
(*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64)))
(*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64))
(*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))))
(*.f64 (cbrt.f64 (PI.f64)) (pow.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 4/3 binary64)))
(*.f64 (cbrt.f64 (PI.f64)) (pow.f64 (pow.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 4/3 binary64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (pow.f64 (PI.f64) #s(literal 7/3 binary64)))
(*.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (pow.f64 (pow.f64 (PI.f64) #s(literal 7/3 binary64)) #s(literal 1 binary64)))
(*.f64 (sqrt.f64 (PI.f64)) (pow.f64 (PI.f64) #s(literal 5/2 binary64)))
(*.f64 (sqrt.f64 (PI.f64)) (pow.f64 (pow.f64 (PI.f64) #s(literal 5/2 binary64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) (pow.f64 (PI.f64) #s(literal 3/2 binary64)))
(*.f64 (pow.f64 (PI.f64) #s(literal 7/3 binary64)) (pow.f64 (PI.f64) #s(literal 2/3 binary64)))
(*.f64 (pow.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 4/3 binary64)) (cbrt.f64 (PI.f64)))
(*.f64 (pow.f64 (PI.f64) #s(literal 5/2 binary64)) (sqrt.f64 (PI.f64)))
(*.f64 (pow.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (pow.f64 (PI.f64) #s(literal 7/3 binary64)) #s(literal 1 binary64)) (pow.f64 (PI.f64) #s(literal 2/3 binary64)))
(*.f64 (pow.f64 (pow.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 4/3 binary64)) #s(literal 1 binary64)) (cbrt.f64 (PI.f64)))
(*.f64 (pow.f64 (pow.f64 (PI.f64) #s(literal 5/2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (PI.f64)))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))
(+.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)) #s(literal 1/2 binary64))
(exp.f64 (*.f64 (log.f64 (sin.f64 phi2)) #s(literal 2 binary64)))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal 2 binary64)))))
(-.f64 (/.f64 #s(literal 1/8 binary64) (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal 2 binary64)))))))) (/.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal 2 binary64)))) #s(literal 3 binary64)) (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal 2 binary64)))))))))
(-.f64 (/.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal 2 binary64)))))) (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal 2 binary64))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal 2 binary64)))))))
(fma.f64 #s(literal 1/2 binary64) (neg.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64)))) #s(literal 1/2 binary64))
(fma.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal 2 binary64)))) #s(literal 1/2 binary64))
(fma.f64 (neg.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal 2 binary64))))))) (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal 2 binary64))))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal 2 binary64))))))))))
(/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal 2 binary64))))))))
(/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))
(/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal 2 binary64)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal 2 binary64))))))
(/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 phi2 #s(literal 2 binary64)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64)))) (neg.f64 (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal 2 binary64)))))))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal 2 binary64))))))))) (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal 2 binary64)))))))
(/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))
(pow.f64 (sin.f64 phi2) #s(literal 2 binary64))
(pow.f64 (/.f64 (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal 2 binary64))))))) (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal 2 binary64))))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal 2 binary64))))))))) #s(literal -1 binary64))
(*.f64 (sin.f64 phi2) (sin.f64 phi2))
(*.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal 2 binary64)))))))))
(*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal 2 binary64)))))))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal 2 binary64)))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))
(+.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) #s(literal 1/2 binary64))
(exp.f64 (*.f64 (log.f64 (sin.f64 phi1)) #s(literal 2 binary64)))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))
(-.f64 (/.f64 #s(literal 1/8 binary64) (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))) (/.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) #s(literal 3 binary64)) (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))))
(-.f64 (/.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(fma.f64 #s(literal 1/2 binary64) (neg.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) #s(literal 1/2 binary64))
(fma.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) #s(literal 1/2 binary64))
(fma.f64 (neg.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))) (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64))))))))))
(/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))))
(/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))
(/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))
(/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64)))) (neg.f64 (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64))))))))) (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))))
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(pow.f64 (/.f64 (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))) (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64))))))))) #s(literal -1 binary64))
(*.f64 (sin.f64 phi1) (sin.f64 phi1))
(*.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))))
(*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64)))))))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(exp.f64 (*.f64 #s(literal 3 binary64) (log.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)))))
(exp.f64 (*.f64 (log.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))) #s(literal 3/2 binary64)))
(exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) #s(literal 3/2 binary64))) #s(literal 2 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2))) #s(literal 3/2 binary64)) #s(literal 2 binary64)))
(exp.f64 (+.f64 (*.f64 (log.f64 (cos.f64 lambda2)) #s(literal 3 binary64)) (*.f64 (log.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))) #s(literal 3 binary64))))
(exp.f64 (+.f64 (*.f64 (log.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))) #s(literal 3 binary64)) (*.f64 (log.f64 (cos.f64 lambda2)) #s(literal 3 binary64))))
(exp.f64 (+.f64 (*.f64 (log.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2))) #s(literal 3/2 binary64)) (*.f64 (log.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2))) #s(literal 3/2 binary64))))
(/.f64 (pow.f64 (*.f64 (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 3 binary64)) #s(literal 64 binary64))
(/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 3 binary64)) #s(literal 8 binary64))
(/.f64 (pow.f64 (*.f64 (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 3 binary64)) #s(literal 8 binary64))
(pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) #s(literal 3 binary64))
(pow.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))) #s(literal 3/2 binary64))
(pow.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) #s(literal 3/2 binary64)) #s(literal 2 binary64))
(pow.f64 (exp.f64 #s(literal 3 binary64)) (log.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2))))
(*.f64 (cos.f64 lambda2) (*.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))))
(*.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (*.f64 (cos.f64 lambda2) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))))
(*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))))
(*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))))
(*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) #s(literal 3 binary64)))
(*.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)))
(*.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)))
(*.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)))
(*.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 3/2 binary64)))
(*.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3/2 binary64)) #s(literal 2 binary64)))
(*.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) #s(literal 3/2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) #s(literal 3/2 binary64)))
(*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 3 binary64)))
(*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #s(literal 3 binary64)))
(*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3/2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2))) #s(literal 3/2 binary64)))
(*.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) #s(literal 3/2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2))) #s(literal 3/2 binary64)))
(*.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3/2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2))) #s(literal 3/2 binary64)))
(*.f64 (pow.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)))
(*.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) #s(literal 3 binary64)))
(*.f64 (*.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))) (cos.f64 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))))
(*.f64 (*.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))) (cos.f64 lambda2))
(*.f64 (*.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(*.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))
(*.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)))
(*.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)))
(*.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)))
(*.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))) #s(literal 3/2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 3/2 binary64)))
(*.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (cos.f64 lambda2)) #s(literal 3/2 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) #s(literal 3/2 binary64)))
(*.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) #s(literal 3/2 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3/2 binary64)))
(*.f64 lambda1 (sin.f64 lambda2))
(*.f64 (sin.f64 lambda2) lambda1)
(-.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))
(/.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) #s(literal -2 binary64))
(pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) #s(literal -1 binary64))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(*.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 1/2 binary64))
(cos.f64 lambda1)
(PI.f64)
(log.f64 (exp.f64 (PI.f64)))
(exp.f64 (log.f64 (PI.f64)))
(exp.f64 (*.f64 (*.f64 #s(literal 1/3 binary64) (log.f64 (PI.f64))) #s(literal 3 binary64)))
(exp.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (PI.f64))) #s(literal 2 binary64)))
(sqrt.f64 (*.f64 (PI.f64) (PI.f64)))
(cbrt.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))))
(pow.f64 (PI.f64) #s(literal 1 binary64))
(pow.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/2 binary64))
(pow.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal 1/3 binary64))
(pow.f64 (cbrt.f64 (PI.f64)) #s(literal 3 binary64))
(pow.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64)))) #s(literal 1/6 binary64))
(pow.f64 (E.f64) (log.f64 (PI.f64)))
(pow.f64 (exp.f64 #s(literal 1/3 binary64)) (*.f64 #s(literal 3 binary64) (log.f64 (PI.f64))))
(*.f64 (PI.f64) #s(literal 1 binary64))
(*.f64 (PI.f64) (log.f64 (E.f64)))
(*.f64 #s(literal 1 binary64) (PI.f64))
(*.f64 (cbrt.f64 (PI.f64)) (pow.f64 (PI.f64) #s(literal 2/3 binary64)))
(*.f64 (cbrt.f64 (PI.f64)) (log.f64 (exp.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)))))
(*.f64 (cbrt.f64 (PI.f64)) (sqrt.f64 (pow.f64 (PI.f64) #s(literal 4/3 binary64))))
(*.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (cbrt.f64 (PI.f64)))
(*.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (log.f64 (exp.f64 (cbrt.f64 (PI.f64)))))
(*.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (pow.f64 (pow.f64 (PI.f64) #s(literal 1/6 binary64)) #s(literal 2 binary64)))
(*.f64 (sqrt.f64 (PI.f64)) (sqrt.f64 (PI.f64)))
(*.f64 (sqrt.f64 (PI.f64)) (log.f64 (exp.f64 (sqrt.f64 (PI.f64)))))
(*.f64 (cbrt.f64 (cbrt.f64 (PI.f64))) (pow.f64 (pow.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 4/3 binary64)) #s(literal 1/3 binary64)))
(*.f64 (cbrt.f64 (cbrt.f64 (PI.f64))) (cbrt.f64 (pow.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 4/3 binary64))))
(*.f64 (pow.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) #s(literal 1/3 binary64)) (pow.f64 (pow.f64 (PI.f64) #s(literal 7/3 binary64)) #s(literal 1/3 binary64)))
(*.f64 (pow.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) #s(literal 1/3 binary64)) (cbrt.f64 (pow.f64 (PI.f64) #s(literal 7/3 binary64))))
(*.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 1/3 binary64)) (pow.f64 (pow.f64 (PI.f64) #s(literal 5/2 binary64)) #s(literal 1/3 binary64)))
(*.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 1/3 binary64)) (cbrt.f64 (pow.f64 (PI.f64) #s(literal 5/2 binary64))))
(*.f64 (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (sqrt.f64 (*.f64 (PI.f64) (pow.f64 (PI.f64) #s(literal 2/3 binary64)))))
(*.f64 (pow.f64 (PI.f64) #s(literal 1/4 binary64)) (sqrt.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64))))
(*.f64 (pow.f64 #s(literal 1 binary64) #s(literal 1/3 binary64)) (PI.f64))
(*.f64 (pow.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) #s(literal 1/3 binary64)) (pow.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) #s(literal 1/3 binary64)))
(*.f64 (pow.f64 (pow.f64 (PI.f64) #s(literal 7/3 binary64)) #s(literal 1/3 binary64)) (pow.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) #s(literal 1/3 binary64)))
(*.f64 (pow.f64 (pow.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 4/3 binary64)) #s(literal 1/3 binary64)) (cbrt.f64 (cbrt.f64 (PI.f64))))
(*.f64 (pow.f64 (pow.f64 (PI.f64) #s(literal 5/2 binary64)) #s(literal 1/3 binary64)) (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 1/3 binary64)))
(*.f64 (pow.f64 (cbrt.f64 (cbrt.f64 (PI.f64))) #s(literal 3 binary64)) (pow.f64 (pow.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) #s(literal 1/3 binary64)) #s(literal 3 binary64)))
(*.f64 (pow.f64 (pow.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) #s(literal 1/3 binary64)) #s(literal 3 binary64)) (pow.f64 (cbrt.f64 (cbrt.f64 (PI.f64))) #s(literal 3 binary64)))
(*.f64 (pow.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 1/3 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 1/3 binary64)) #s(literal 3 binary64)))
(*.f64 (pow.f64 (pow.f64 (PI.f64) #s(literal 1/6 binary64)) #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 2/3 binary64)))
(*.f64 (exp.f64 (*.f64 #s(literal 1/3 binary64) (log.f64 (PI.f64)))) (exp.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) (log.f64 (PI.f64))))))
(*.f64 (exp.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) (log.f64 (PI.f64))))) (exp.f64 (*.f64 #s(literal 1/3 binary64) (log.f64 (PI.f64)))))
(*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (PI.f64)))) (exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (PI.f64)))))
(*.f64 (cbrt.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64))) (cbrt.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64))))
(*.f64 (cbrt.f64 (pow.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 4/3 binary64))) (cbrt.f64 (cbrt.f64 (PI.f64))))
(*.f64 (cbrt.f64 (pow.f64 (PI.f64) #s(literal 7/3 binary64))) (pow.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) #s(literal 1/3 binary64)))
(*.f64 (cbrt.f64 (pow.f64 (PI.f64) #s(literal 5/2 binary64))) (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 1/3 binary64)))
(*.f64 (sqrt.f64 (*.f64 (PI.f64) (pow.f64 (PI.f64) #s(literal 2/3 binary64)))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)))
(*.f64 (sqrt.f64 (pow.f64 (PI.f64) #s(literal 4/3 binary64))) (cbrt.f64 (PI.f64)))
(*.f64 (sqrt.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64))) (pow.f64 (PI.f64) #s(literal 1/4 binary64)))

simplify1.0s (4.1%)

Memory
-115.8MiB live, 1 359.8MiB allocated
Algorithm
1×egg-herbie
Rules
13 362×accelerator-lowering-fma.f32
13 362×accelerator-lowering-fma.f64
8 970×*-lowering-*.f32
8 970×*-lowering-*.f64
3 714×+-lowering-+.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
066136061
1209735666
0807633642
Stop Event
1×iter limit
1×node limit
Counts
600 → 600
Calls
Call 1
Inputs
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(+ (* (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 (- (* phi1 (- (+ (* -3/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* -1/2 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* 1/2 (/ (cos (* 2 phi2)) (* (cos lambda1) (* (cos lambda2) (cos phi2))))))) (+ (* -1 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* -1 (/ (pow (sin phi2) 2) (* (cos lambda1) (* (cos lambda2) (cos phi2))))) (* 1/2 (/ 1 (* (cos lambda1) (* (cos lambda2) (cos phi2))))))))) (* -1 (sin phi2)))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
(+ (* phi1 (- (* phi1 (- (+ (* -3/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* -1/2 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (* 1/2 (/ (cos (* 2 phi2)) (* (cos lambda1) (* (cos lambda2) (cos phi2))))) (* phi1 (- (/ (pow (sin phi2) 3) (* (pow (cos lambda1) 2) (* (pow (cos lambda2) 2) (pow (cos phi2) 2)))) (+ (* -1 (/ (* (sin phi2) (- (+ (* -3/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* 1/2 (/ (cos (* 2 phi2)) (* (cos lambda1) (* (cos lambda2) (cos phi2)))))) (+ (* -1 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* -1 (/ (pow (sin phi2) 2) (* (cos lambda1) (* (cos lambda2) (cos phi2))))) (* 1/2 (/ 1 (* (cos lambda1) (* (cos lambda2) (cos phi2))))))))) (* (cos lambda1) (* (cos lambda2) (cos phi2))))) (+ (* 1/6 (sin phi2)) (+ (* 1/2 (sin phi2)) (/ (* (sin phi2) (- (+ 1/2 (* -1 (* (pow (cos lambda1) 2) (* (pow (cos lambda2) 2) (pow (cos phi2) 2))))) (* 1/2 (cos (* 2 phi2))))) (* (pow (cos lambda1) 2) (* (pow (cos lambda2) 2) (pow (cos phi2) 2)))))))))))) (+ (* -1 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* -1 (/ (pow (sin phi2) 2) (* (cos lambda1) (* (cos lambda2) (cos phi2))))) (* 1/2 (/ 1 (* (cos lambda1) (* (cos lambda2) (cos phi2))))))))) (* -1 (sin phi2)))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
(+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+ (* (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 (- (* phi2 (- (+ (* -3/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (+ (* -1/2 (* (cos phi1) (* (sin lambda1) (sin lambda2)))) (* 1/2 (/ (cos (* 2 phi1)) (* (cos lambda1) (* (cos lambda2) (cos phi1))))))) (+ (* -1 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (+ (* -1 (/ (pow (sin phi1) 2) (* (cos lambda1) (* (cos lambda2) (cos phi1))))) (* 1/2 (/ 1 (* (cos lambda1) (* (cos lambda2) (cos phi1))))))))) (* -1 (sin phi1)))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2)))))
(+ (* phi2 (- (* phi2 (- (+ (* -3/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (+ (* -1/2 (* (cos phi1) (* (sin lambda1) (sin lambda2)))) (+ (* 1/2 (/ (cos (* 2 phi1)) (* (cos lambda1) (* (cos lambda2) (cos phi1))))) (* phi2 (- (/ (pow (sin phi1) 3) (* (pow (cos lambda1) 2) (* (pow (cos lambda2) 2) (pow (cos phi1) 2)))) (+ (* -1 (/ (* (sin phi1) (- (+ (* -3/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (* 1/2 (/ (cos (* 2 phi1)) (* (cos lambda1) (* (cos lambda2) (cos phi1)))))) (+ (* -1 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (+ (* -1 (/ (pow (sin phi1) 2) (* (cos lambda1) (* (cos lambda2) (cos phi1))))) (* 1/2 (/ 1 (* (cos lambda1) (* (cos lambda2) (cos phi1))))))))) (* (cos lambda1) (* (cos lambda2) (cos phi1))))) (+ (* 1/6 (sin phi1)) (+ (* 1/2 (sin phi1)) (/ (* (sin phi1) (- (+ 1/2 (* -1 (* (pow (cos lambda1) 2) (* (pow (cos lambda2) 2) (pow (cos phi1) 2))))) (* 1/2 (cos (* 2 phi1))))) (* (pow (cos lambda1) 2) (* (pow (cos lambda2) 2) (pow (cos phi1) 2)))))))))))) (+ (* -1 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (+ (* -1 (/ (pow (sin phi1) 2) (* (cos lambda1) (* (cos lambda2) (cos phi1))))) (* 1/2 (/ 1 (* (cos lambda1) (* (cos lambda2) (cos phi1))))))))) (* -1 (sin phi1)))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2)))))
(+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+ (/ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+ (* lambda2 (+ (* lambda2 (- (* -3/2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (+ (/ (* (cos lambda1) (* (pow (sin phi1) 3) (* (pow (sin phi2) 3) (+ (* -1/2 (* (cos lambda1) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (* -1/2 (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))))))) (pow (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2)) (/ (* (pow (cos lambda1) 4) (* (pow (cos phi1) 3) (* (pow (cos phi2) 3) (+ (* -1/2 (* (cos lambda1) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (* -1/2 (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))))))) (pow (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+ (* lambda2 (+ (* lambda2 (- (+ (* -3/2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))))) (+ (/ (* (cos lambda1) (* (pow (sin phi1) 3) (* (pow (sin phi2) 3) (+ (* -1/2 (* (cos lambda1) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (* -1/2 (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))))))) (pow (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2)) (/ (* (pow (cos lambda1) 4) (* (pow (cos phi1) 3) (* (pow (cos phi2) 3) (+ (* -1/2 (* (cos lambda1) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (* -1/2 (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))))))) (pow (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+ (/ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (+ (/ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+ (* lambda1 (+ (* lambda1 (- (* -3/2 (/ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (+ (/ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (* (pow (cos phi2) 3) (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (* -1/2 (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))))))) (pow (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2)) (/ (* (pow (sin phi1) 3) (* (pow (sin phi2) 3) (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (* -1/2 (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))))))) (pow (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (/ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+ (* lambda1 (+ (* lambda1 (- (+ (* -3/2 (/ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))))) (+ (/ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (* (pow (cos phi2) 3) (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (* -1/2 (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))))))) (pow (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2)) (/ (* (pow (sin phi1) 3) (* (pow (sin phi2) 3) (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (* -1/2 (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))))))) (pow (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (/ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(* (cos lambda1) (* (cos lambda2) (cos phi2)))
(+ (* phi1 (sin phi2)) (* (cos lambda1) (* (cos lambda2) (cos phi2))))
(+ (* phi1 (- (* phi1 (- (+ (* -3/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* 1/2 (/ (cos (* 2 phi2)) (* (cos lambda1) (* (cos lambda2) (cos phi2)))))) (+ (* -1 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* -1 (/ (pow (sin phi2) 2) (* (cos lambda1) (* (cos lambda2) (cos phi2))))) (* 1/2 (/ 1 (* (cos lambda1) (* (cos lambda2) (cos phi2))))))))) (* -1 (sin phi2)))) (* (cos lambda1) (* (cos lambda2) (cos phi2))))
(+ (* phi1 (- (* phi1 (- (+ (* -3/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* 1/2 (/ (cos (* 2 phi2)) (* (cos lambda1) (* (cos lambda2) (cos phi2))))) (* phi1 (- (/ (pow (sin phi2) 3) (* (pow (cos lambda1) 2) (* (pow (cos lambda2) 2) (pow (cos phi2) 2)))) (+ (* -1 (/ (* (sin phi2) (- (+ (* -3/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* 1/2 (/ (cos (* 2 phi2)) (* (cos lambda1) (* (cos lambda2) (cos phi2)))))) (+ (* -1 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* -1 (/ (pow (sin phi2) 2) (* (cos lambda1) (* (cos lambda2) (cos phi2))))) (* 1/2 (/ 1 (* (cos lambda1) (* (cos lambda2) (cos phi2))))))))) (* (cos lambda1) (* (cos lambda2) (cos phi2))))) (+ (* 1/6 (sin phi2)) (+ (* 1/2 (sin phi2)) (/ (* (sin phi2) (- (+ 1/2 (* -1 (* (pow (cos lambda1) 2) (* (pow (cos lambda2) 2) (pow (cos phi2) 2))))) (* 1/2 (cos (* 2 phi2))))) (* (pow (cos lambda1) 2) (* (pow (cos lambda2) 2) (pow (cos phi2) 2))))))))))) (+ (* -1 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* -1 (/ (pow (sin phi2) 2) (* (cos lambda1) (* (cos lambda2) (cos phi2))))) (* 1/2 (/ 1 (* (cos lambda1) (* (cos lambda2) (cos phi2))))))))) (* -1 (sin phi2)))) (* (cos lambda1) (* (cos lambda2) (cos phi2))))
(/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(* (cos lambda1) (* (cos lambda2) (cos phi1)))
(+ (* phi2 (sin phi1)) (* (cos lambda1) (* (cos lambda2) (cos phi1))))
(+ (* phi2 (- (* phi2 (- (+ (* -3/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (* 1/2 (/ (cos (* 2 phi1)) (* (cos lambda1) (* (cos lambda2) (cos phi1)))))) (+ (* -1 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (+ (* -1 (/ (pow (sin phi1) 2) (* (cos lambda1) (* (cos lambda2) (cos phi1))))) (* 1/2 (/ 1 (* (cos lambda1) (* (cos lambda2) (cos phi1))))))))) (* -1 (sin phi1)))) (* (cos lambda1) (* (cos lambda2) (cos phi1))))
(+ (* phi2 (- (* phi2 (- (+ (* -3/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (+ (* 1/2 (/ (cos (* 2 phi1)) (* (cos lambda1) (* (cos lambda2) (cos phi1))))) (* phi2 (- (/ (pow (sin phi1) 3) (* (pow (cos lambda1) 2) (* (pow (cos lambda2) 2) (pow (cos phi1) 2)))) (+ (* -1 (/ (* (sin phi1) (- (+ (* -3/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (* 1/2 (/ (cos (* 2 phi1)) (* (cos lambda1) (* (cos lambda2) (cos phi1)))))) (+ (* -1 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (+ (* -1 (/ (pow (sin phi1) 2) (* (cos lambda1) (* (cos lambda2) (cos phi1))))) (* 1/2 (/ 1 (* (cos lambda1) (* (cos lambda2) (cos phi1))))))))) (* (cos lambda1) (* (cos lambda2) (cos phi1))))) (+ (* 1/6 (sin phi1)) (+ (* 1/2 (sin phi1)) (/ (* (sin phi1) (- (+ 1/2 (* -1 (* (pow (cos lambda1) 2) (* (pow (cos lambda2) 2) (pow (cos phi1) 2))))) (* 1/2 (cos (* 2 phi1))))) (* (pow (cos lambda1) 2) (* (pow (cos lambda2) 2) (pow (cos phi1) 2))))))))))) (+ (* -1 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (+ (* -1 (/ (pow (sin phi1) 2) (* (cos lambda1) (* (cos lambda2) (cos phi1))))) (* 1/2 (/ 1 (* (cos lambda1) (* (cos lambda2) (cos phi1))))))))) (* -1 (sin phi1)))) (* (cos lambda1) (* (cos lambda2) (cos phi1))))
(/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/ (+ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(+ (* (pow lambda2 2) (- (* -3/2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (/ (* (cos lambda1) (* (+ (* -1/2 (* (cos lambda1) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (* -1/2 (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (+ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))))) (pow (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+ (* (pow lambda2 2) (- (+ (* -3/2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (* (pow lambda2 2) (- (* 7/8 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (+ (/ (* (cos lambda1) (* (+ (* -1/2 (* (cos lambda1) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (* -1/2 (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (- (* -3/2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (/ (* (cos lambda1) (* (+ (* -1/2 (* (cos lambda1) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (* -1/2 (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (+ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))))) (pow (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2))))) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (cos lambda1) (* (+ (* 1/24 (* (cos lambda1) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (+ (* 1/24 (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* 1/4 (* (cos lambda1) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))))) (+ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))))) (pow (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2)))))) (/ (* (cos lambda1) (* (+ (* -1/2 (* (cos lambda1) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (* -1/2 (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (+ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))))) (pow (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+ (* (pow lambda2 2) (- (+ (* -3/2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (* (pow lambda2 2) (- (+ (* 7/8 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (* (pow lambda2 2) (- (* -61/240 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (+ (/ (* (cos lambda1) (* (+ (* -1/2 (* (cos lambda1) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (* -1/2 (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (- (* 7/8 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (+ (/ (* (cos lambda1) (* (+ (* -1/2 (* (cos lambda1) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (* -1/2 (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (- (* -3/2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (/ (* (cos lambda1) (* (+ (* -1/2 (* (cos lambda1) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (* -1/2 (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (+ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))))) (pow (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2))))) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (cos lambda1) (* (+ (* 1/24 (* (cos lambda1) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (+ (* 1/24 (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* 1/4 (* (cos lambda1) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))))) (+ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))))) (pow (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2)))))) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (+ (/ (* (cos lambda1) (* (+ (* -1/24 (* (cos lambda1) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (+ (* -1/720 (* (cos lambda1) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (* -1/720 (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))))) (+ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))))) (pow (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2)) (/ (* (cos lambda1) (* (+ (* 1/24 (* (cos lambda1) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (+ (* 1/24 (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* 1/4 (* (cos lambda1) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))))) (- (* -3/2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (/ (* (cos lambda1) (* (+ (* -1/2 (* (cos lambda1) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (* -1/2 (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (+ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))))) (pow (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2))))) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))) (+ (/ (* (cos lambda1) (* (+ (* -1/2 (* (cos lambda1) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (* -1/2 (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (- (* -3/2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (/ (* (cos lambda1) (* (+ (* -1/2 (* (cos lambda1) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (* -1/2 (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (+ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))))) (pow (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2))))) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (cos lambda1) (* (+ (* 1/24 (* (cos lambda1) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (+ (* 1/24 (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* 1/4 (* (cos lambda1) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))))) (+ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))))) (pow (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2)))))) (/ (* (cos lambda1) (* (+ (* -1/2 (* (cos lambda1) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (* -1/2 (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (+ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))))) (pow (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/ (+ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(+ (* (pow lambda1 2) (- (* -3/2 (/ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (/ (* (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (* -1/2 (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))))) (+ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (* (pow (sin phi1) 3) (pow (sin phi2) 3)))) (pow (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2)))) (+ (/ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+ (* (pow lambda1 2) (- (+ (* -3/2 (/ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (* (pow lambda1 2) (- (* 7/8 (/ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (+ (/ (* (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (* -1/2 (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))))) (- (* -3/2 (/ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (/ (* (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (* -1/2 (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))))) (+ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (* (pow (sin phi1) 3) (pow (sin phi2) 3)))) (pow (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2)))) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (+ (* 1/24 (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (+ (* 1/24 (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (* 1/4 (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))))) (+ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (* (pow (sin phi1) 3) (pow (sin phi2) 3)))) (pow (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2)))))) (/ (* (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (* -1/2 (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))))) (+ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (* (pow (sin phi1) 3) (pow (sin phi2) 3)))) (pow (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2)))) (+ (/ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+ (* (pow lambda1 2) (- (+ (* -3/2 (/ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (* (pow lambda1 2) (- (+ (* 7/8 (/ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (* (pow lambda1 2) (- (* -61/240 (/ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (+ (/ (* (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (* -1/2 (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))))) (- (* 7/8 (/ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (+ (/ (* (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (* -1/2 (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))))) (- (* -3/2 (/ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (/ (* (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (* -1/2 (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))))) (+ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (* (pow (sin phi1) 3) (pow (sin phi2) 3)))) (pow (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2)))) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (+ (* 1/24 (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (+ (* 1/24 (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (* 1/4 (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))))) (+ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (* (pow (sin phi1) 3) (pow (sin phi2) 3)))) (pow (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2))))) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (+ (/ (* (+ (* -1/24 (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (+ (* -1/720 (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (* -1/720 (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))))) (+ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (* (pow (sin phi1) 3) (pow (sin phi2) 3)))) (pow (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2)) (/ (* (+ (* 1/24 (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (+ (* 1/24 (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (* 1/4 (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))))) (- (* -3/2 (/ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (/ (* (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (* -1/2 (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))))) (+ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (* (pow (sin phi1) 3) (pow (sin phi2) 3)))) (pow (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2)))) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))) (+ (/ (* (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (* -1/2 (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))))) (- (* -3/2 (/ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (/ (* (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (* -1/2 (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))))) (+ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (* (pow (sin phi1) 3) (pow (sin phi2) 3)))) (pow (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2)))) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (+ (* 1/24 (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (+ (* 1/24 (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (* 1/4 (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))))) (+ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (* (pow (sin phi1) 3) (pow (sin phi2) 3)))) (pow (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2)))))) (/ (* (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (* -1/2 (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))))) (+ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (* (pow (sin phi1) 3) (pow (sin phi2) 3)))) (pow (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2)))) (+ (/ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(* R lambda1)
(* R lambda1)
(* R lambda1)
(* R lambda1)
(* R lambda1)
(* R lambda1)
(* R lambda1)
(* R lambda1)
(* R lambda1)
(* R lambda1)
(* R lambda1)
(* R lambda1)
(* R lambda1)
(* R lambda1)
(* R lambda1)
(* R lambda1)
(* R lambda1)
(* R lambda1)
(* R lambda1)
(* R lambda1)
(* R lambda1)
(* R lambda1)
(* R lambda1)
(* R lambda1)
(* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))
(* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))
(* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))
(* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))
(* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))
(* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))
(* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))
(* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))
(* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))
(* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))
(* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))
(* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))
(* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))
(* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))
(* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))
(* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))
(* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))
(* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))
(* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))
(* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))
(* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))
(* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))
(* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))
(* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))
(* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))
(* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))
(* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))
(* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))
(* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))
(* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))
(* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))
(* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))
(* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))
(* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))
(* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))
(* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))
(acos (+ (cos lambda2) (* lambda1 (sin lambda2))))
(acos (+ (cos lambda2) (* lambda1 (sin lambda2))))
(acos (+ (cos lambda2) (* lambda1 (sin lambda2))))
(acos (+ (cos lambda2) (* lambda1 (sin lambda2))))
(acos (+ (cos lambda2) (* lambda1 (sin lambda2))))
(acos (+ (cos lambda2) (* lambda1 (sin lambda2))))
(acos (+ (cos lambda2) (* lambda1 (sin lambda2))))
(acos (+ (cos lambda2) (* lambda1 (sin lambda2))))
(acos (+ (cos lambda2) (* lambda1 (sin lambda2))))
(acos (+ (cos lambda2) (* lambda1 (sin lambda2))))
(acos (+ (cos lambda2) (* lambda1 (sin lambda2))))
(acos (+ (cos lambda2) (* lambda1 (sin lambda2))))
(acos (+ (cos lambda2) (* lambda1 (sin lambda2))))
(acos (+ (cos lambda2) (* lambda1 (sin lambda2))))
(acos (+ (cos lambda2) (* lambda1 (sin lambda2))))
(acos (+ (cos lambda2) (* lambda1 (sin lambda2))))
(acos (+ (cos lambda2) (* lambda1 (sin lambda2))))
(acos (+ (cos lambda2) (* lambda1 (sin lambda2))))
(acos (+ (cos lambda2) (* lambda1 (sin lambda2))))
(acos (+ (cos lambda2) (* lambda1 (sin lambda2))))
(acos (+ (cos lambda2) (* lambda1 (sin lambda2))))
(acos (+ (cos lambda2) (* lambda1 (sin lambda2))))
(acos (+ (cos lambda2) (* lambda1 (sin lambda2))))
(acos (+ (cos lambda2) (* lambda1 (sin lambda2))))
1
(+ 1 (* lambda1 lambda2))
(+ 1 (* lambda2 (+ lambda1 (* -1/2 lambda2))))
(+ 1 (* lambda2 (+ lambda1 (* lambda2 (- (* -1/6 (* lambda1 lambda2)) 1/2)))))
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(cos lambda2)
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(* lambda1 (sin lambda2))
(* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1)))
(* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1)))
(* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1)))
(* lambda1 (sin lambda2))
(* -1 (* lambda1 (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1)))))
(* -1 (* lambda1 (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1)))))
(* -1 (* lambda1 (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1)))))
1
(+ 1 (* -1/2 (pow lambda2 2)))
(+ 1 (* (pow lambda2 2) (- (* 1/24 (pow lambda2 2)) 1/2)))
(+ 1 (* (pow lambda2 2) (- (* (pow lambda2 2) (+ 1/24 (* -1/720 (pow lambda2 2)))) 1/2)))
(cos lambda2)
(cos lambda2)
(cos lambda2)
(cos lambda2)
(cos lambda2)
(cos lambda2)
(cos lambda2)
(cos lambda2)
(cos lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(+ (cos lambda1) (* lambda2 (+ (sin lambda1) (* -1/2 (* lambda2 (cos lambda1))))))
(+ (cos lambda1) (* lambda2 (+ (sin lambda1) (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))))))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(cos lambda2)
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))
(+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))))))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))
(* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))
(* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))
(* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))
(* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))
(* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))
(* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))
(* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))
(* -1 (* R (+ (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (* -1/2 (PI)))))
(* -1 (* R (+ (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (* -1/2 (PI)))))
(* -1 (* R (+ (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (* -1/2 (PI)))))
(* -1 (* R (+ (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (* -1/2 (PI)))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(pow phi2 2)
(* (pow phi2 2) (+ 1 (* -1/3 (pow phi2 2))))
(* (pow phi2 2) (+ 1 (* (pow phi2 2) (- (* 2/45 (pow phi2 2)) 1/3))))
(* (pow phi2 2) (+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 2/45 (* -1/315 (pow phi2 2)))) 1/3))))
(- 1/2 (* 1/2 (cos (* 2 phi2))))
(- 1/2 (* 1/2 (cos (* 2 phi2))))
(- 1/2 (* 1/2 (cos (* 2 phi2))))
(- 1/2 (* 1/2 (cos (* 2 phi2))))
(- 1/2 (* 1/2 (cos (* 2 phi2))))
(- 1/2 (* 1/2 (cos (* 2 phi2))))
(- 1/2 (* 1/2 (cos (* 2 phi2))))
(- 1/2 (* 1/2 (cos (* 2 phi2))))
(pow phi1 2)
(* (pow phi1 2) (+ 1 (* -1/3 (pow phi1 2))))
(* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* 2/45 (pow phi1 2)) 1/3))))
(* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 2/45 (* -1/315 (pow phi1 2)))) 1/3))))
(- 1/2 (* 1/2 (cos (* 2 phi1))))
(- 1/2 (* 1/2 (cos (* 2 phi1))))
(- 1/2 (* 1/2 (cos (* 2 phi1))))
(- 1/2 (* 1/2 (cos (* 2 phi1))))
(- 1/2 (* 1/2 (cos (* 2 phi1))))
(- 1/2 (* 1/2 (cos (* 2 phi1))))
(- 1/2 (* 1/2 (cos (* 2 phi1))))
(- 1/2 (* 1/2 (cos (* 2 phi1))))
(* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))
(+ (* -3/2 (* (pow lambda2 2) (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))) (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))
(+ (* (pow lambda2 2) (+ (* -3/2 (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* 7/8 (* (pow lambda2 2) (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))))) (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))
(+ (* (pow lambda2 2) (+ (* -3/2 (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow lambda2 2) (+ (* -61/240 (* (pow lambda2 2) (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))) (* 7/8 (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))))))) (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))
(* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))
(* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))
(* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))
(* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))
(* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))
(* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))
(* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))
(* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))
(* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))
(+ (* -3/2 (* (pow lambda1 2) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))
(+ (* (pow lambda1 2) (+ (* -3/2 (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* 7/8 (* (pow lambda1 2) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))))) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))
(+ (* (pow lambda1 2) (+ (* -3/2 (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow lambda1 2) (+ (* -61/240 (* (pow lambda1 2) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))) (* 7/8 (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))))))) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))
(* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))
(* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))
(* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))
(* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))
(* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))
(* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))
(* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))
(* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))
(* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (pow (cos phi2) 3)))
(+ (* -3/2 (* (pow phi1 2) (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (pow (cos phi2) 3))))) (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (pow (cos phi2) 3))))
(+ (* (pow phi1 2) (+ (* -3/2 (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (pow (cos phi2) 3)))) (* 7/8 (* (pow phi1 2) (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (pow (cos phi2) 3))))))) (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (pow (cos phi2) 3))))
(+ (* (pow phi1 2) (+ (* -3/2 (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (pow (cos phi2) 3)))) (* (pow phi1 2) (+ (* -61/240 (* (pow phi1 2) (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (pow (cos phi2) 3))))) (* 7/8 (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (pow (cos phi2) 3)))))))) (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (pow (cos phi2) 3))))
(* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))
(* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))
(* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))
(* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))
(* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))
(* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))
(* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))
(* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))
(* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (pow (cos phi1) 3)))
(+ (* -3/2 (* (pow phi2 2) (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (pow (cos phi1) 3))))) (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (pow (cos phi1) 3))))
(+ (* (pow phi2 2) (+ (* -3/2 (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (pow (cos phi1) 3)))) (* 7/8 (* (pow phi2 2) (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (pow (cos phi1) 3))))))) (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (pow (cos phi1) 3))))
(+ (* (pow phi2 2) (+ (* -3/2 (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (pow (cos phi1) 3)))) (* (pow phi2 2) (+ (* -61/240 (* (pow phi2 2) (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (pow (cos phi1) 3))))) (* 7/8 (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (pow (cos phi1) 3)))))))) (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (pow (cos phi1) 3))))
(* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))
(* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))
(* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))
(* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))
(* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))
(* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))
(* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))
(* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))
(* lambda1 (sin lambda2))
(* lambda1 (sin lambda2))
(* lambda1 (sin lambda2))
(* lambda1 (sin lambda2))
(* lambda1 (sin lambda2))
(* lambda1 (sin lambda2))
(* lambda1 (sin lambda2))
(* lambda1 (sin lambda2))
(* lambda1 (sin lambda2))
(* lambda1 (sin lambda2))
(* lambda1 (sin lambda2))
(* lambda1 (sin lambda2))
(* lambda1 lambda2)
(* lambda2 (+ lambda1 (* -1/6 (* lambda1 (pow lambda2 2)))))
(* lambda2 (+ lambda1 (* (pow lambda2 2) (+ (* -1/6 lambda1) (* 1/120 (* lambda1 (pow lambda2 2)))))))
(* lambda2 (+ lambda1 (* (pow lambda2 2) (+ (* -1/6 lambda1) (* (pow lambda2 2) (+ (* -1/5040 (* lambda1 (pow lambda2 2))) (* 1/120 lambda1)))))))
(* lambda1 (sin lambda2))
(* lambda1 (sin lambda2))
(* lambda1 (sin lambda2))
(* lambda1 (sin lambda2))
(* lambda1 (sin lambda2))
(* lambda1 (sin lambda2))
(* lambda1 (sin lambda2))
(* lambda1 (sin lambda2))
(* lambda1 (sin lambda2))
(* lambda1 (+ (sin lambda2) (* -1/6 (* (pow lambda1 2) (sin lambda2)))))
(* lambda1 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/6 (sin lambda2)) (* 1/120 (* (pow lambda1 2) (sin lambda2)))))))
(* lambda1 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/6 (sin lambda2)) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (sin lambda2))) (* 1/120 (sin lambda2))))))))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* 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))))))))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
1
(+ 1 (* -1/2 (pow lambda1 2)))
(+ 1 (* (pow lambda1 2) (- (* 1/24 (pow lambda1 2)) 1/2)))
(+ 1 (* (pow lambda1 2) (- (* (pow lambda1 2) (+ 1/24 (* -1/720 (pow lambda1 2)))) 1/2)))
(cos lambda1)
(cos lambda1)
(cos lambda1)
(cos lambda1)
(cos lambda1)
(cos lambda1)
(cos lambda1)
(cos lambda1)
Outputs
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))))
(acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))))))
(+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2))))
(*.f64 (cos.f64 phi2) (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(+ (* phi1 (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
(+.f64 (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (*.f64 phi1 (sin.f64 phi2)))
(+ (* phi1 (- (* phi1 (- (+ (* -3/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* -1/2 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* 1/2 (/ (cos (* 2 phi2)) (* (cos lambda1) (* (cos lambda2) (cos phi2))))))) (+ (* -1 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* -1 (/ (pow (sin phi2) 2) (* (cos lambda1) (* (cos lambda2) (cos phi2))))) (* 1/2 (/ 1 (* (cos lambda1) (* (cos lambda2) (cos phi2))))))))) (* -1 (sin phi2)))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
(+.f64 (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (*.f64 phi1 (+.f64 (sin.f64 phi2) (*.f64 phi1 (+.f64 (+.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) (/.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (-.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi2) #s(literal -3/2 binary64))) (-.f64 (-.f64 (/.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (/.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))))))
(+ (* phi1 (- (* phi1 (- (+ (* -3/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* -1/2 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (* 1/2 (/ (cos (* 2 phi2)) (* (cos lambda1) (* (cos lambda2) (cos phi2))))) (* phi1 (- (/ (pow (sin phi2) 3) (* (pow (cos lambda1) 2) (* (pow (cos lambda2) 2) (pow (cos phi2) 2)))) (+ (* -1 (/ (* (sin phi2) (- (+ (* -3/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* 1/2 (/ (cos (* 2 phi2)) (* (cos lambda1) (* (cos lambda2) (cos phi2)))))) (+ (* -1 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* -1 (/ (pow (sin phi2) 2) (* (cos lambda1) (* (cos lambda2) (cos phi2))))) (* 1/2 (/ 1 (* (cos lambda1) (* (cos lambda2) (cos phi2))))))))) (* (cos lambda1) (* (cos lambda2) (cos phi2))))) (+ (* 1/6 (sin phi2)) (+ (* 1/2 (sin phi2)) (/ (* (sin phi2) (- (+ 1/2 (* -1 (* (pow (cos lambda1) 2) (* (pow (cos lambda2) 2) (pow (cos phi2) 2))))) (* 1/2 (cos (* 2 phi2))))) (* (pow (cos lambda1) 2) (* (pow (cos lambda2) 2) (pow (cos phi2) 2)))))))))))) (+ (* -1 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* -1 (/ (pow (sin phi2) 2) (* (cos lambda1) (* (cos lambda2) (cos phi2))))) (* 1/2 (/ 1 (* (cos lambda1) (* (cos lambda2) (cos phi2))))))))) (* -1 (sin phi2)))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
(+.f64 (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (*.f64 phi1 (+.f64 (sin.f64 phi2) (*.f64 phi1 (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi2) #s(literal -3/2 binary64))) (+.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 phi2) #s(literal -1/2 binary64))) (+.f64 (*.f64 phi1 (-.f64 (/.f64 (/.f64 (pow.f64 (sin.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (-.f64 (+.f64 (/.f64 (*.f64 (sin.f64 phi2) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))))) (*.f64 (sin.f64 phi2) #s(literal 2/3 binary64))) (*.f64 (+.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) (/.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi2) #s(literal -3/2 binary64))) (-.f64 (-.f64 (/.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (/.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) (/.f64 (sin.f64 phi2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))))) (-.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) (/.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (-.f64 (/.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (/.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))))))))
(+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))
(+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))
(+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))
(+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))
(+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))
(+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))
(+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))
(+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))
(+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2))))
(*.f64 (cos.f64 phi1) (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(+ (* phi2 (sin phi1)) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2)))))
(+.f64 (*.f64 (cos.f64 phi1) (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (*.f64 phi2 (sin.f64 phi1)))
(+ (* phi2 (- (* phi2 (- (+ (* -3/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (+ (* -1/2 (* (cos phi1) (* (sin lambda1) (sin lambda2)))) (* 1/2 (/ (cos (* 2 phi1)) (* (cos lambda1) (* (cos lambda2) (cos phi1))))))) (+ (* -1 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (+ (* -1 (/ (pow (sin phi1) 2) (* (cos lambda1) (* (cos lambda2) (cos phi1))))) (* 1/2 (/ 1 (* (cos lambda1) (* (cos lambda2) (cos phi1))))))))) (* -1 (sin phi1)))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2)))))
(+.f64 (*.f64 (cos.f64 phi1) (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (*.f64 phi2 (+.f64 (sin.f64 phi1) (*.f64 phi2 (+.f64 (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) #s(literal -3/2 binary64))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 phi1) #s(literal -1/2 binary64)))) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (-.f64 (-.f64 (/.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 lambda2))) (/.f64 (/.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 lambda2))) (cos.f64 lambda1))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))))))
(+ (* phi2 (- (* phi2 (- (+ (* -3/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (+ (* -1/2 (* (cos phi1) (* (sin lambda1) (sin lambda2)))) (+ (* 1/2 (/ (cos (* 2 phi1)) (* (cos lambda1) (* (cos lambda2) (cos phi1))))) (* phi2 (- (/ (pow (sin phi1) 3) (* (pow (cos lambda1) 2) (* (pow (cos lambda2) 2) (pow (cos phi1) 2)))) (+ (* -1 (/ (* (sin phi1) (- (+ (* -3/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (* 1/2 (/ (cos (* 2 phi1)) (* (cos lambda1) (* (cos lambda2) (cos phi1)))))) (+ (* -1 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (+ (* -1 (/ (pow (sin phi1) 2) (* (cos lambda1) (* (cos lambda2) (cos phi1))))) (* 1/2 (/ 1 (* (cos lambda1) (* (cos lambda2) (cos phi1))))))))) (* (cos lambda1) (* (cos lambda2) (cos phi1))))) (+ (* 1/6 (sin phi1)) (+ (* 1/2 (sin phi1)) (/ (* (sin phi1) (- (+ 1/2 (* -1 (* (pow (cos lambda1) 2) (* (pow (cos lambda2) 2) (pow (cos phi1) 2))))) (* 1/2 (cos (* 2 phi1))))) (* (pow (cos lambda1) 2) (* (pow (cos lambda2) 2) (pow (cos phi1) 2)))))))))))) (+ (* -1 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (+ (* -1 (/ (pow (sin phi1) 2) (* (cos lambda1) (* (cos lambda2) (cos phi1))))) (* 1/2 (/ 1 (* (cos lambda1) (* (cos lambda2) (cos phi1))))))))) (* -1 (sin phi1)))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2)))))
(+.f64 (*.f64 (cos.f64 phi1) (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (*.f64 phi2 (+.f64 (sin.f64 phi1) (*.f64 phi2 (+.f64 (+.f64 (+.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 phi1) #s(literal -1/2 binary64))) (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) (*.f64 phi2 (-.f64 (/.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (-.f64 (+.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (/.f64 (sin.f64 phi1) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) #s(literal 2/3 binary64))) (*.f64 (sin.f64 phi1) (/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) #s(literal -3/2 binary64))) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (-.f64 (-.f64 (/.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 lambda2))) (/.f64 (/.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 lambda2))) (cos.f64 lambda1))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))))) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) #s(literal -3/2 binary64))) (-.f64 (-.f64 (/.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 lambda2))) (/.f64 (/.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 lambda2))) (cos.f64 lambda1))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))))))
(+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))
(+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))
(+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))
(+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))
(+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))
(+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))
(+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))
(+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))
(+ (/ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))
(+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) lambda2))))
(+ (* lambda2 (+ (* lambda2 (- (* -3/2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (+ (/ (* (cos lambda1) (* (pow (sin phi1) 3) (* (pow (sin phi2) 3) (+ (* -1/2 (* (cos lambda1) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (* -1/2 (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))))))) (pow (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2)) (/ (* (pow (cos lambda1) 4) (* (pow (cos phi1) 3) (* (pow (cos phi2) 3) (+ (* -1/2 (* (cos lambda1) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (* -1/2 (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))))))) (pow (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (*.f64 lambda2 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (*.f64 lambda2 (-.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) #s(literal -3/2 binary64))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (+.f64 (/.f64 (*.f64 (cos.f64 lambda1) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 phi2) #s(literal 3 binary64)) #s(literal -1/2 binary64)) (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (cos.f64 lambda1) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))))) (pow.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) #s(literal -1/2 binary64)) (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (cos.f64 lambda1) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)))) (pow.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #s(literal 2 binary64)))))))))
(+ (* lambda2 (+ (* lambda2 (- (+ (* -3/2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))))) (+ (/ (* (cos lambda1) (* (pow (sin phi1) 3) (* (pow (sin phi2) 3) (+ (* -1/2 (* (cos lambda1) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (* -1/2 (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))))))) (pow (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2)) (/ (* (pow (cos lambda1) 4) (* (pow (cos phi1) 3) (* (pow (cos phi2) 3) (+ (* -1/2 (* (cos lambda1) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (* -1/2 (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))))))) (pow (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (*.f64 lambda2 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (*.f64 lambda2 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) #s(literal -3/2 binary64))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (*.f64 lambda2 #s(literal -1/6 binary64)))) (+.f64 (/.f64 (*.f64 (cos.f64 lambda1) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (*.f64 (*.f64 (pow.f64 (sin.f64 phi2) #s(literal 3 binary64)) #s(literal -1/2 binary64)) (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (cos.f64 lambda1) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))))) (pow.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) #s(literal -1/2 binary64)) (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (cos.f64 lambda1) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 4 binary64)))) (pow.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #s(literal 2 binary64))))))))))
(+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))
(+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))
(+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))
(+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))
(+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))
(+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))
(+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))
(+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))
(+ (/ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))
(+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (+ (/ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 lambda1 (sin.f64 lambda2)))))
(+ (* lambda1 (+ (* lambda1 (- (* -3/2 (/ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (+ (/ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (* (pow (cos phi2) 3) (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (* -1/2 (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))))))) (pow (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2)) (/ (* (pow (sin phi1) 3) (* (pow (sin phi2) 3) (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (* -1/2 (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))))))) (pow (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (/ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (*.f64 lambda1 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2))) (*.f64 lambda1 (-.f64 (-.f64 (/.f64 (*.f64 (*.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)))) #s(literal -1/2 binary64)) (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) #s(literal -1/2 binary64)) (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #s(literal 2 binary64))))))))
(+ (* lambda1 (+ (* lambda1 (- (+ (* -3/2 (/ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))))) (+ (/ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (* (pow (cos phi2) 3) (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (* -1/2 (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))))))) (pow (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2)) (/ (* (pow (sin phi1) 3) (* (pow (sin phi2) 3) (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (* -1/2 (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))))))) (pow (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (/ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (*.f64 lambda1 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2))) (*.f64 lambda1 (-.f64 (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (*.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda1 (cos.f64 phi1))) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) #s(literal -1/2 binary64)) (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)))) #s(literal -1/2 binary64)) (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) (pow.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #s(literal 2 binary64)))))))))
(+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))
(+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))
(+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))
(+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))
(+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))
(+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))
(+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))
(+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))
(* (cos lambda1) (* (cos lambda2) (cos phi2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(+ (* phi1 (sin phi2)) (* (cos lambda1) (* (cos lambda2) (cos phi2))))
(+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 phi1 (sin.f64 phi2)))
(+ (* phi1 (- (* phi1 (- (+ (* -3/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* 1/2 (/ (cos (* 2 phi2)) (* (cos lambda1) (* (cos lambda2) (cos phi2)))))) (+ (* -1 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* -1 (/ (pow (sin phi2) 2) (* (cos lambda1) (* (cos lambda2) (cos phi2))))) (* 1/2 (/ 1 (* (cos lambda1) (* (cos lambda2) (cos phi2))))))))) (* -1 (sin phi2)))) (* (cos lambda1) (* (cos lambda2) (cos phi2))))
(+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 phi1 (+.f64 (sin.f64 phi2) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) (/.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi2) #s(literal -3/2 binary64))) (-.f64 (-.f64 (/.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (/.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))))))
(+ (* phi1 (- (* phi1 (- (+ (* -3/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* 1/2 (/ (cos (* 2 phi2)) (* (cos lambda1) (* (cos lambda2) (cos phi2))))) (* phi1 (- (/ (pow (sin phi2) 3) (* (pow (cos lambda1) 2) (* (pow (cos lambda2) 2) (pow (cos phi2) 2)))) (+ (* -1 (/ (* (sin phi2) (- (+ (* -3/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* 1/2 (/ (cos (* 2 phi2)) (* (cos lambda1) (* (cos lambda2) (cos phi2)))))) (+ (* -1 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* -1 (/ (pow (sin phi2) 2) (* (cos lambda1) (* (cos lambda2) (cos phi2))))) (* 1/2 (/ 1 (* (cos lambda1) (* (cos lambda2) (cos phi2))))))))) (* (cos lambda1) (* (cos lambda2) (cos phi2))))) (+ (* 1/6 (sin phi2)) (+ (* 1/2 (sin phi2)) (/ (* (sin phi2) (- (+ 1/2 (* -1 (* (pow (cos lambda1) 2) (* (pow (cos lambda2) 2) (pow (cos phi2) 2))))) (* 1/2 (cos (* 2 phi2))))) (* (pow (cos lambda1) 2) (* (pow (cos lambda2) 2) (pow (cos phi2) 2))))))))))) (+ (* -1 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* -1 (/ (pow (sin phi2) 2) (* (cos lambda1) (* (cos lambda2) (cos phi2))))) (* 1/2 (/ 1 (* (cos lambda1) (* (cos lambda2) (cos phi2))))))))) (* -1 (sin phi2)))) (* (cos lambda1) (* (cos lambda2) (cos phi2))))
(+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 phi1 (+.f64 (sin.f64 phi2) (*.f64 phi1 (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi2) #s(literal -3/2 binary64))) (+.f64 (*.f64 phi1 (-.f64 (/.f64 (/.f64 (pow.f64 (sin.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (-.f64 (+.f64 (/.f64 (*.f64 (sin.f64 phi2) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))))) (*.f64 (sin.f64 phi2) #s(literal 2/3 binary64))) (*.f64 (+.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) (/.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi2) #s(literal -3/2 binary64))) (-.f64 (-.f64 (/.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (/.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) (/.f64 (sin.f64 phi2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))))) (-.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) (/.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (-.f64 (/.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (/.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))))))))
(/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64)))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))
(/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64)))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))
(/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64)))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))
(/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64)))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))
(/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64)))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))
(/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64)))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))
(/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64)))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))
(/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64)))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))
(* (cos lambda1) (* (cos lambda2) (cos phi1)))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(+ (* phi2 (sin phi1)) (* (cos lambda1) (* (cos lambda2) (cos phi1))))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 phi2 (sin.f64 phi1)))
(+ (* phi2 (- (* phi2 (- (+ (* -3/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (* 1/2 (/ (cos (* 2 phi1)) (* (cos lambda1) (* (cos lambda2) (cos phi1)))))) (+ (* -1 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (+ (* -1 (/ (pow (sin phi1) 2) (* (cos lambda1) (* (cos lambda2) (cos phi1))))) (* 1/2 (/ 1 (* (cos lambda1) (* (cos lambda2) (cos phi1))))))))) (* -1 (sin phi1)))) (* (cos lambda1) (* (cos lambda2) (cos phi1))))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 phi2 (+.f64 (sin.f64 phi1) (*.f64 phi2 (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) #s(literal -3/2 binary64))) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (-.f64 (-.f64 (/.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 lambda2))) (/.f64 (/.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 lambda2))) (cos.f64 lambda1))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))))))
(+ (* phi2 (- (* phi2 (- (+ (* -3/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (+ (* 1/2 (/ (cos (* 2 phi1)) (* (cos lambda1) (* (cos lambda2) (cos phi1))))) (* phi2 (- (/ (pow (sin phi1) 3) (* (pow (cos lambda1) 2) (* (pow (cos lambda2) 2) (pow (cos phi1) 2)))) (+ (* -1 (/ (* (sin phi1) (- (+ (* -3/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (* 1/2 (/ (cos (* 2 phi1)) (* (cos lambda1) (* (cos lambda2) (cos phi1)))))) (+ (* -1 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (+ (* -1 (/ (pow (sin phi1) 2) (* (cos lambda1) (* (cos lambda2) (cos phi1))))) (* 1/2 (/ 1 (* (cos lambda1) (* (cos lambda2) (cos phi1))))))))) (* (cos lambda1) (* (cos lambda2) (cos phi1))))) (+ (* 1/6 (sin phi1)) (+ (* 1/2 (sin phi1)) (/ (* (sin phi1) (- (+ 1/2 (* -1 (* (pow (cos lambda1) 2) (* (pow (cos lambda2) 2) (pow (cos phi1) 2))))) (* 1/2 (cos (* 2 phi1))))) (* (pow (cos lambda1) 2) (* (pow (cos lambda2) 2) (pow (cos phi1) 2))))))))))) (+ (* -1 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (+ (* -1 (/ (pow (sin phi1) 2) (* (cos lambda1) (* (cos lambda2) (cos phi1))))) (* 1/2 (/ 1 (* (cos lambda1) (* (cos lambda2) (cos phi1))))))))) (* -1 (sin phi1)))) (* (cos lambda1) (* (cos lambda2) (cos phi1))))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 phi2 (+.f64 (sin.f64 phi1) (*.f64 phi2 (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) #s(literal -3/2 binary64))) (+.f64 (*.f64 phi2 (-.f64 (/.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (-.f64 (+.f64 (*.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (/.f64 (sin.f64 phi1) (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) #s(literal 2/3 binary64))) (*.f64 (sin.f64 phi1) (/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) #s(literal -3/2 binary64))) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (-.f64 (-.f64 (/.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 lambda2))) (/.f64 (/.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 lambda2))) (cos.f64 lambda1))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))))) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (-.f64 (-.f64 (/.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 lambda2))) (/.f64 (/.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 lambda2))) (cos.f64 lambda1))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))))))))
(/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64)))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))
(/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64)))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))
(/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64)))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))
(/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64)))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))
(/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64)))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))
(/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64)))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))
(/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64)))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))
(/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64)))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))
(/ (+ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/.f64 (+.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(+ (* (pow lambda2 2) (- (* -3/2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (/ (* (cos lambda1) (* (+ (* -1/2 (* (cos lambda1) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (* -1/2 (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (+ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))))) (pow (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (*.f64 (*.f64 lambda2 lambda2) (-.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) #s(literal -3/2 binary64))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (/.f64 (*.f64 (cos.f64 lambda1) (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (cos.f64 lambda1) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (+.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))))))) (pow.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #s(literal 2 binary64)))))))
(+ (* (pow lambda2 2) (- (+ (* -3/2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (* (pow lambda2 2) (- (* 7/8 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (+ (/ (* (cos lambda1) (* (+ (* -1/2 (* (cos lambda1) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (* -1/2 (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (- (* -3/2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (/ (* (cos lambda1) (* (+ (* -1/2 (* (cos lambda1) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (* -1/2 (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (+ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))))) (pow (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2))))) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (cos lambda1) (* (+ (* 1/24 (* (cos lambda1) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (+ (* 1/24 (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* 1/4 (* (cos lambda1) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))))) (+ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))))) (pow (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2)))))) (/ (* (cos lambda1) (* (+ (* -1/2 (* (cos lambda1) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (* -1/2 (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (+ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))))) (pow (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (*.f64 (*.f64 lambda2 lambda2) (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) #s(literal -3/2 binary64))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (-.f64 (*.f64 (*.f64 lambda2 lambda2) (-.f64 (/.f64 (*.f64 (*.f64 #s(literal 7/8 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (*.f64 (cos.f64 lambda1) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (cos.f64 lambda1) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) #s(literal -3/2 binary64))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (/.f64 (*.f64 (cos.f64 lambda1) (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (cos.f64 lambda1) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (+.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))))))) (pow.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #s(literal 2 binary64)))))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (*.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (*.f64 (cos.f64 lambda1) #s(literal 1/4 binary64))) (*.f64 #s(literal 1/24 binary64) (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (cos.f64 lambda1) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))) (/.f64 (+.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (pow.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #s(literal 2 binary64)))))))) (/.f64 (*.f64 (cos.f64 lambda1) (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (cos.f64 lambda1) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (+.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))))))) (pow.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #s(literal 2 binary64))))))))
(+ (* (pow lambda2 2) (- (+ (* -3/2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (* (pow lambda2 2) (- (+ (* 7/8 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (* (pow lambda2 2) (- (* -61/240 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (+ (/ (* (cos lambda1) (* (+ (* -1/2 (* (cos lambda1) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (* -1/2 (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (- (* 7/8 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (+ (/ (* (cos lambda1) (* (+ (* -1/2 (* (cos lambda1) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (* -1/2 (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (- (* -3/2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (/ (* (cos lambda1) (* (+ (* -1/2 (* (cos lambda1) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (* -1/2 (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (+ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))))) (pow (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2))))) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (cos lambda1) (* (+ (* 1/24 (* (cos lambda1) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (+ (* 1/24 (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* 1/4 (* (cos lambda1) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))))) (+ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))))) (pow (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2)))))) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (+ (/ (* (cos lambda1) (* (+ (* -1/24 (* (cos lambda1) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (+ (* -1/720 (* (cos lambda1) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (* -1/720 (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))))) (+ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))))) (pow (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2)) (/ (* (cos lambda1) (* (+ (* 1/24 (* (cos lambda1) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (+ (* 1/24 (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* 1/4 (* (cos lambda1) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))))) (- (* -3/2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (/ (* (cos lambda1) (* (+ (* -1/2 (* (cos lambda1) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (* -1/2 (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (+ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))))) (pow (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2))))) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))) (+ (/ (* (cos lambda1) (* (+ (* -1/2 (* (cos lambda1) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (* -1/2 (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (- (* -3/2 (/ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (/ (* (cos lambda1) (* (+ (* -1/2 (* (cos lambda1) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (* -1/2 (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (+ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))))) (pow (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2))))) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (cos lambda1) (* (+ (* 1/24 (* (cos lambda1) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (+ (* 1/24 (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* 1/4 (* (cos lambda1) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))))) (+ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))))) (pow (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2)))))) (/ (* (cos lambda1) (* (+ (* -1/2 (* (cos lambda1) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (* -1/2 (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (+ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))))) (pow (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2)))) (+ (/ (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (*.f64 (*.f64 lambda2 lambda2) (+.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) #s(literal -3/2 binary64))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (-.f64 (*.f64 (*.f64 lambda2 lambda2) (+.f64 (/.f64 (*.f64 (*.f64 #s(literal 7/8 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (-.f64 (*.f64 (*.f64 lambda2 lambda2) (-.f64 (-.f64 (/.f64 (*.f64 #s(literal -61/240 binary64) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (/.f64 (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (cos.f64 lambda1) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) (-.f64 (/.f64 (*.f64 (*.f64 #s(literal 7/8 binary64) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (*.f64 (cos.f64 lambda1) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (cos.f64 lambda1) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) #s(literal -3/2 binary64))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (/.f64 (*.f64 (cos.f64 lambda1) (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (cos.f64 lambda1) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (+.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))))))) (pow.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #s(literal 2 binary64)))))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (*.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (*.f64 (cos.f64 lambda1) #s(literal 1/4 binary64))) (*.f64 #s(literal 1/24 binary64) (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (cos.f64 lambda1) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))) (/.f64 (+.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (pow.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #s(literal 2 binary64))))))))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (*.f64 (cos.f64 lambda1) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/720 binary64) (cos.f64 phi1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) #s(literal -31/720 binary64)))) (pow.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #s(literal 2 binary64))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) #s(literal -3/2 binary64))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (/.f64 (*.f64 (cos.f64 lambda1) (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (cos.f64 lambda1) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (+.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))))))) (pow.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #s(literal 2 binary64)))) (/.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (*.f64 (cos.f64 lambda1) #s(literal 1/4 binary64))) (*.f64 #s(literal 1/24 binary64) (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (cos.f64 lambda1) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))))))) (*.f64 (cos.f64 lambda1) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (cos.f64 lambda1) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) #s(literal -3/2 binary64))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (/.f64 (*.f64 (cos.f64 lambda1) (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (cos.f64 lambda1) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (+.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))))))) (pow.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #s(literal 2 binary64)))))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (*.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (*.f64 (cos.f64 lambda1) #s(literal 1/4 binary64))) (*.f64 #s(literal 1/24 binary64) (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (cos.f64 lambda1) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))))) (/.f64 (+.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (pow.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #s(literal 2 binary64))))))))) (/.f64 (*.f64 (cos.f64 lambda1) (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (cos.f64 lambda1) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (+.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))))))) (pow.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #s(literal 2 binary64)))))))
(/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64)))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))
(/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64)))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))
(/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64)))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))
(/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64)))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))
(/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64)))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))
(/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64)))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))
(/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64)))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))
(/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64)))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))
(/ (+ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)))) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(+ (* (pow lambda1 2) (- (* -3/2 (/ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (/ (* (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (* -1/2 (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))))) (+ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (* (pow (sin phi1) 3) (pow (sin phi2) 3)))) (pow (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2)))) (+ (/ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (*.f64 (*.f64 lambda1 lambda1) (-.f64 (/.f64 (*.f64 (*.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (+.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)))) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64)))))) (pow.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #s(literal 2 binary64)))))))
(+ (* (pow lambda1 2) (- (+ (* -3/2 (/ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (* (pow lambda1 2) (- (* 7/8 (/ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (+ (/ (* (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (* -1/2 (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))))) (- (* -3/2 (/ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (/ (* (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (* -1/2 (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))))) (+ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (* (pow (sin phi1) 3) (pow (sin phi2) 3)))) (pow (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2)))) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (+ (* 1/24 (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (+ (* 1/24 (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (* 1/4 (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))))) (+ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (* (pow (sin phi1) 3) (pow (sin phi2) 3)))) (pow (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2)))))) (/ (* (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (* -1/2 (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))))) (+ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (* (pow (sin phi1) 3) (pow (sin phi2) 3)))) (pow (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2)))) (+ (/ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+.f64 (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (*.f64 (*.f64 lambda1 lambda1) (+.f64 (*.f64 (*.f64 lambda1 lambda1) (-.f64 (/.f64 (*.f64 (*.f64 #s(literal 7/8 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (+.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)))) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64)))))) (pow.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #s(literal 2 binary64)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)))) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64)))) (+.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/24 binary64) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) #s(literal 7/24 binary64))))) (pow.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #s(literal 2 binary64)))))) (-.f64 (/.f64 (*.f64 (*.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (+.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)))) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64)))))) (pow.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #s(literal 2 binary64)))))))
(+ (* (pow lambda1 2) (- (+ (* -3/2 (/ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (* (pow lambda1 2) (- (+ (* 7/8 (/ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (* (pow lambda1 2) (- (* -61/240 (/ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (+ (/ (* (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (* -1/2 (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))))) (- (* 7/8 (/ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (+ (/ (* (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (* -1/2 (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))))) (- (* -3/2 (/ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (/ (* (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (* -1/2 (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))))) (+ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (* (pow (sin phi1) 3) (pow (sin phi2) 3)))) (pow (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2)))) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (+ (* 1/24 (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (+ (* 1/24 (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (* 1/4 (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))))) (+ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (* (pow (sin phi1) 3) (pow (sin phi2) 3)))) (pow (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2))))) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (+ (/ (* (+ (* -1/24 (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (+ (* -1/720 (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (* -1/720 (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))))) (+ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (* (pow (sin phi1) 3) (pow (sin phi2) 3)))) (pow (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2)) (/ (* (+ (* 1/24 (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (+ (* 1/24 (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (* 1/4 (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))))) (- (* -3/2 (/ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (/ (* (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (* -1/2 (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))))) (+ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (* (pow (sin phi1) 3) (pow (sin phi2) 3)))) (pow (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2)))) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))) (+ (/ (* (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (* -1/2 (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))))) (- (* -3/2 (/ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (/ (* (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (* -1/2 (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))))) (+ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (* (pow (sin phi1) 3) (pow (sin phi2) 3)))) (pow (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2)))) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (+ (* 1/24 (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (+ (* 1/24 (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (* 1/4 (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))))) (+ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (* (pow (sin phi1) 3) (pow (sin phi2) 3)))) (pow (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2)))))) (/ (* (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (* -1/2 (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))))) (+ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (* (pow (sin phi1) 3) (pow (sin phi2) 3)))) (pow (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2)))) (+ (/ (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (sin phi1) 3) (pow (sin phi2) 3)) (+ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))
(+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (+.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (*.f64 (*.f64 lambda1 lambda1) (+.f64 (*.f64 (*.f64 lambda1 lambda1) (+.f64 (*.f64 (*.f64 lambda1 lambda1) (-.f64 (-.f64 (/.f64 (*.f64 (*.f64 #s(literal -61/240 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)))) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64)))) (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) #s(literal -1/24 binary64))) (*.f64 #s(literal -1/720 binary64) (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))))) (pow.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #s(literal 2 binary64))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (+.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)))) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64)))))) (pow.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #s(literal 2 binary64)))) (/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/24 binary64) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) #s(literal 7/24 binary64)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 #s(literal 7/8 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (+.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)))) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64)))))) (pow.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #s(literal 2 binary64)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)))) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64)))) (+.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/24 binary64) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) #s(literal 7/24 binary64))))) (pow.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #s(literal 2 binary64))))) (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))))) (-.f64 (/.f64 (*.f64 (*.f64 #s(literal 7/8 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))))) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (+.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)))) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64)))))) (pow.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #s(literal 2 binary64)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (/.f64 (*.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)))) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64)))) (+.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/24 binary64) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) #s(literal 7/24 binary64))))) (pow.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #s(literal 2 binary64))))))) (-.f64 (/.f64 (*.f64 (*.f64 #s(literal -3/2 binary64) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))) (+.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)))) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64)))))) (pow.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) #s(literal 2 binary64))))))))
(/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64)))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))
(/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64)))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))
(/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64)))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))
(/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64)))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))
(/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64)))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))
(/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64)))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))
(/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64)))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))
(/ (+ (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow (sin phi1) 3) (pow (sin phi2) 3))) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 3 binary64)) (pow.f64 (sin.f64 phi2) #s(literal 3 binary64)))) (+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))
(* R lambda1)
(*.f64 R lambda1)
(* R lambda1)
(*.f64 R lambda1)
(* R lambda1)
(*.f64 R lambda1)
(* R lambda1)
(*.f64 R lambda1)
(* R lambda1)
(*.f64 R lambda1)
(* R lambda1)
(*.f64 R lambda1)
(* R lambda1)
(*.f64 R lambda1)
(* R lambda1)
(*.f64 R lambda1)
(* R lambda1)
(*.f64 R lambda1)
(* R lambda1)
(*.f64 R lambda1)
(* R lambda1)
(*.f64 R lambda1)
(* R lambda1)
(*.f64 R lambda1)
(* R lambda1)
(*.f64 R lambda1)
(* R lambda1)
(*.f64 R lambda1)
(* R lambda1)
(*.f64 R lambda1)
(* R lambda1)
(*.f64 R lambda1)
(* R lambda1)
(*.f64 R lambda1)
(* R lambda1)
(*.f64 R lambda1)
(* R lambda1)
(*.f64 R lambda1)
(* R lambda1)
(*.f64 R lambda1)
(* R lambda1)
(*.f64 R lambda1)
(* R lambda1)
(*.f64 R lambda1)
(* R lambda1)
(*.f64 R lambda1)
(* R lambda1)
(*.f64 R lambda1)
(* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))
(*.f64 R (acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))))
(* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))
(*.f64 R (acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))))
(* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))
(*.f64 R (acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))))
(* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))
(*.f64 R (acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))))
(* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))
(*.f64 R (acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))))
(* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))
(*.f64 R (acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))))
(* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))
(*.f64 R (acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))))
(* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))
(*.f64 R (acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))))
(* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))
(*.f64 R (acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))))
(* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))
(*.f64 R (acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))))
(* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))
(*.f64 R (acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))))
(* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))
(*.f64 R (acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))))
(* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))
(*.f64 R (acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))))
(* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))
(*.f64 R (acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))))
(* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))
(*.f64 R (acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))))
(* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))
(*.f64 R (acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))))
(* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))
(*.f64 R (acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))))
(* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))
(*.f64 R (acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))))
(* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))
(*.f64 R (acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))))
(* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))
(*.f64 R (acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))))
(* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))
(*.f64 R (acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))))
(* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))
(*.f64 R (acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))))
(* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))
(*.f64 R (acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))))
(* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))
(*.f64 R (acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))))
(* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))
(*.f64 R (acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))))
(* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))
(*.f64 R (acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))))
(* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))
(*.f64 R (acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))))
(* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))
(*.f64 R (acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))))
(* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))
(*.f64 R (acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))))
(* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))
(*.f64 R (acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))))
(* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))
(*.f64 R (acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))))
(* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))
(*.f64 R (acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))))
(* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))
(*.f64 R (acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))))
(* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))
(*.f64 R (acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))))
(* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))
(*.f64 R (acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))))
(* R (acos (+ (cos lambda2) (* lambda1 (sin lambda2)))))
(*.f64 R (acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))))
(acos (+ (cos lambda2) (* lambda1 (sin lambda2))))
(acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))
(acos (+ (cos lambda2) (* lambda1 (sin lambda2))))
(acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))
(acos (+ (cos lambda2) (* lambda1 (sin lambda2))))
(acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))
(acos (+ (cos lambda2) (* lambda1 (sin lambda2))))
(acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))
(acos (+ (cos lambda2) (* lambda1 (sin lambda2))))
(acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))
(acos (+ (cos lambda2) (* lambda1 (sin lambda2))))
(acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))
(acos (+ (cos lambda2) (* lambda1 (sin lambda2))))
(acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))
(acos (+ (cos lambda2) (* lambda1 (sin lambda2))))
(acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))
(acos (+ (cos lambda2) (* lambda1 (sin lambda2))))
(acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))
(acos (+ (cos lambda2) (* lambda1 (sin lambda2))))
(acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))
(acos (+ (cos lambda2) (* lambda1 (sin lambda2))))
(acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))
(acos (+ (cos lambda2) (* lambda1 (sin lambda2))))
(acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))
(acos (+ (cos lambda2) (* lambda1 (sin lambda2))))
(acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))
(acos (+ (cos lambda2) (* lambda1 (sin lambda2))))
(acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))
(acos (+ (cos lambda2) (* lambda1 (sin lambda2))))
(acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))
(acos (+ (cos lambda2) (* lambda1 (sin lambda2))))
(acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))
(acos (+ (cos lambda2) (* lambda1 (sin lambda2))))
(acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))
(acos (+ (cos lambda2) (* lambda1 (sin lambda2))))
(acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))
(acos (+ (cos lambda2) (* lambda1 (sin lambda2))))
(acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))
(acos (+ (cos lambda2) (* lambda1 (sin lambda2))))
(acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))
(acos (+ (cos lambda2) (* lambda1 (sin lambda2))))
(acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))
(acos (+ (cos lambda2) (* lambda1 (sin lambda2))))
(acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))
(acos (+ (cos lambda2) (* lambda1 (sin lambda2))))
(acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))
(acos (+ (cos lambda2) (* lambda1 (sin lambda2))))
(acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))
1
#s(literal 1 binary64)
(+ 1 (* lambda1 lambda2))
(+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2))
(+ 1 (* lambda2 (+ lambda1 (* -1/2 lambda2))))
(+.f64 #s(literal 1 binary64) (*.f64 lambda2 (+.f64 lambda1 (*.f64 lambda2 #s(literal -1/2 binary64)))))
(+ 1 (* lambda2 (+ lambda1 (* lambda2 (- (* -1/6 (* lambda1 lambda2)) 1/2)))))
(+.f64 #s(literal 1 binary64) (*.f64 lambda2 (+.f64 lambda1 (*.f64 lambda2 (+.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (*.f64 lambda1 #s(literal -1/6 binary64))))))))
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))
(cos lambda2)
(cos.f64 lambda2)
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))
(* lambda1 (sin lambda2))
(*.f64 lambda1 (sin.f64 lambda2))
(* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1)))
(*.f64 lambda1 (+.f64 (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1)))
(* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1)))
(*.f64 lambda1 (+.f64 (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1)))
(* lambda1 (+ (sin lambda2) (/ (cos lambda2) lambda1)))
(*.f64 lambda1 (+.f64 (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1)))
(* lambda1 (sin lambda2))
(*.f64 lambda1 (sin.f64 lambda2))
(* -1 (* lambda1 (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1)))))
(*.f64 lambda1 (+.f64 (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1)))
(* -1 (* lambda1 (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1)))))
(*.f64 lambda1 (+.f64 (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1)))
(* -1 (* lambda1 (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1)))))
(*.f64 lambda1 (+.f64 (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1)))
1
#s(literal 1 binary64)
(+ 1 (* -1/2 (pow lambda2 2)))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda2 lambda2)))
(+ 1 (* (pow lambda2 2) (- (* 1/24 (pow lambda2 2)) 1/2)))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 lambda2 lambda2) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 lambda2 lambda2) #s(literal 1/24 binary64)))))
(+ 1 (* (pow lambda2 2) (- (* (pow lambda2 2) (+ 1/24 (* -1/720 (pow lambda2 2)))) 1/2)))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 lambda2 lambda2) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 lambda2 lambda2) (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 lambda2 lambda2) #s(literal -1/720 binary64)))))))
(cos lambda2)
(cos.f64 lambda2)
(cos lambda2)
(cos.f64 lambda2)
(cos lambda2)
(cos.f64 lambda2)
(cos lambda2)
(cos.f64 lambda2)
(cos lambda2)
(cos.f64 lambda2)
(cos lambda2)
(cos.f64 lambda2)
(cos lambda2)
(cos.f64 lambda2)
(cos lambda2)
(cos.f64 lambda2)
(cos lambda1)
(cos.f64 lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(+.f64 (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) lambda2))
(+ (cos lambda1) (* lambda2 (+ (sin lambda1) (* -1/2 (* lambda2 (cos lambda1))))))
(+.f64 (cos.f64 lambda1) (*.f64 lambda2 (+.f64 (sin.f64 lambda1) (*.f64 lambda2 (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64))))))
(+ (cos lambda1) (* lambda2 (+ (sin lambda1) (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))))))
(+.f64 (cos.f64 lambda1) (*.f64 lambda2 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda2 lambda2)) #s(literal 1 binary64)) (sin.f64 lambda1)))))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(cos lambda2)
(cos.f64 lambda2)
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))
(+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))
(+.f64 (cos.f64 lambda2) (*.f64 lambda1 (+.f64 (sin.f64 lambda2) (*.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64))))))
(+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))))))
(+.f64 (cos.f64 lambda2) (*.f64 lambda1 (+.f64 (*.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64))) (*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda1 lambda1)) #s(literal 1 binary64)) (sin.f64 lambda2)))))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(* R (acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(acos (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(* -1 (* R (+ (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (* -1/2 (PI)))))
(*.f64 (+.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))))) (*.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 R))
(* -1 (* R (+ (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (* -1/2 (PI)))))
(*.f64 (+.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))))) (*.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 R))
(* -1 (* R (+ (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (* -1/2 (PI)))))
(*.f64 (+.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))))) (*.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 R))
(* -1 (* R (+ (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (* -1/2 (PI)))))
(*.f64 (+.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))))) (*.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 R))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))
(*.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))))
(pow phi2 2)
(*.f64 phi2 phi2)
(* (pow phi2 2) (+ 1 (* -1/3 (pow phi2 2))))
(*.f64 (*.f64 phi2 phi2) (+.f64 #s(literal 1 binary64) (*.f64 phi2 (*.f64 phi2 #s(literal -1/3 binary64)))))
(* (pow phi2 2) (+ 1 (* (pow phi2 2) (- (* 2/45 (pow phi2 2)) 1/3))))
(*.f64 (*.f64 phi2 phi2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (+.f64 #s(literal -1/3 binary64) (*.f64 (*.f64 phi2 phi2) #s(literal 2/45 binary64))))))
(* (pow phi2 2) (+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 2/45 (* -1/315 (pow phi2 2)))) 1/3))))
(*.f64 (*.f64 phi2 phi2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (+.f64 #s(literal -1/3 binary64) (*.f64 (*.f64 phi2 phi2) (+.f64 #s(literal 2/45 binary64) (*.f64 (*.f64 phi2 phi2) #s(literal -1/315 binary64))))))))
(- 1/2 (* 1/2 (cos (* 2 phi2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))
(- 1/2 (* 1/2 (cos (* 2 phi2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))
(- 1/2 (* 1/2 (cos (* 2 phi2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))
(- 1/2 (* 1/2 (cos (* 2 phi2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))
(- 1/2 (* 1/2 (cos (* 2 phi2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))
(- 1/2 (* 1/2 (cos (* 2 phi2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))
(- 1/2 (* 1/2 (cos (* 2 phi2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))
(- 1/2 (* 1/2 (cos (* 2 phi2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)))
(pow phi1 2)
(*.f64 phi1 phi1)
(* (pow phi1 2) (+ 1 (* -1/3 (pow phi1 2))))
(*.f64 phi1 (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 phi1 phi1)))))
(* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* 2/45 (pow phi1 2)) 1/3))))
(*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1/3 binary64) (*.f64 #s(literal 2/45 binary64) (*.f64 phi1 phi1))))))
(* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 2/45 (* -1/315 (pow phi1 2)))) 1/3))))
(*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1/3 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/315 binary64) (*.f64 phi1 phi1))))))))
(- 1/2 (* 1/2 (cos (* 2 phi1))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))
(- 1/2 (* 1/2 (cos (* 2 phi1))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))
(- 1/2 (* 1/2 (cos (* 2 phi1))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))
(- 1/2 (* 1/2 (cos (* 2 phi1))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))
(- 1/2 (* 1/2 (cos (* 2 phi1))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))
(- 1/2 (* 1/2 (cos (* 2 phi1))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))
(- 1/2 (* 1/2 (cos (* 2 phi1))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))
(- 1/2 (* 1/2 (cos (* 2 phi1))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))
(* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))
(*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))
(+ (* -3/2 (* (pow lambda2 2) (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))) (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))
(*.f64 (+.f64 (*.f64 #s(literal -3/2 binary64) (*.f64 lambda2 lambda2)) #s(literal 1 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))))
(+ (* (pow lambda2 2) (+ (* -3/2 (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* 7/8 (* (pow lambda2 2) (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))))) (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))
(+.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (*.f64 (*.f64 lambda2 lambda2) (*.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (+.f64 #s(literal -3/2 binary64) (*.f64 #s(literal 7/8 binary64) (*.f64 lambda2 lambda2))))))
(+ (* (pow lambda2 2) (+ (* -3/2 (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow lambda2 2) (+ (* -61/240 (* (pow lambda2 2) (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))) (* 7/8 (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))))))) (* (pow (cos lambda1) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))
(+.f64 (*.f64 (+.f64 (*.f64 #s(literal -3/2 binary64) (*.f64 lambda2 lambda2)) #s(literal 1 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (*.f64 (*.f64 lambda2 lambda2) (*.f64 (*.f64 lambda2 lambda2) (*.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal -61/240 binary64) (*.f64 lambda2 lambda2)) #s(literal 7/8 binary64))))))
(* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))
(*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))))
(* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))
(*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))))
(* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))
(*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))))
(* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))
(*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))))
(* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))
(*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))))
(* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))
(*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))))
(* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))
(*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))))
(* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))
(*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))))
(* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))
(*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64))))
(+ (* -3/2 (* (pow lambda1 2) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))
(*.f64 (+.f64 (*.f64 #s(literal -3/2 binary64) (*.f64 lambda1 lambda1)) #s(literal 1 binary64)) (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)))))
(+ (* (pow lambda1 2) (+ (* -3/2 (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* 7/8 (* (pow lambda1 2) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))))) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))
(+.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)))) (*.f64 (*.f64 lambda1 lambda1) (*.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)))) (+.f64 #s(literal -3/2 binary64) (*.f64 #s(literal 7/8 binary64) (*.f64 lambda1 lambda1))))))
(+ (* (pow lambda1 2) (+ (* -3/2 (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))) (* (pow lambda1 2) (+ (* -61/240 (* (pow lambda1 2) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))) (* 7/8 (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3)))))))) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))
(+.f64 (*.f64 (+.f64 (*.f64 #s(literal -3/2 binary64) (*.f64 lambda1 lambda1)) #s(literal 1 binary64)) (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64))))) (*.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal -61/240 binary64) (*.f64 lambda1 lambda1)) #s(literal 7/8 binary64))) (*.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1))))
(* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))
(*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))))
(* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))
(*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))))
(* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))
(*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))))
(* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))
(*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))))
(* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))
(*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))))
(* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))
(*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))))
(* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))
(*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))))
(* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))
(*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))))
(* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (pow (cos phi2) 3)))
(*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))
(+ (* -3/2 (* (pow phi1 2) (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (pow (cos phi2) 3))))) (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (pow (cos phi2) 3))))
(*.f64 (+.f64 (*.f64 #s(literal -3/2 binary64) (*.f64 phi1 phi1)) #s(literal 1 binary64)) (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))))
(+ (* (pow phi1 2) (+ (* -3/2 (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (pow (cos phi2) 3)))) (* 7/8 (* (pow phi1 2) (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (pow (cos phi2) 3))))))) (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (pow (cos phi2) 3))))
(+.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (*.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (+.f64 #s(literal -3/2 binary64) (*.f64 #s(literal 7/8 binary64) (*.f64 phi1 phi1))))))
(+ (* (pow phi1 2) (+ (* -3/2 (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (pow (cos phi2) 3)))) (* (pow phi1 2) (+ (* -61/240 (* (pow phi1 2) (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (pow (cos phi2) 3))))) (* 7/8 (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (pow (cos phi2) 3)))))))) (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (pow (cos phi2) 3))))
(+.f64 (*.f64 (+.f64 (*.f64 #s(literal -3/2 binary64) (*.f64 phi1 phi1)) #s(literal 1 binary64)) (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (*.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal -61/240 binary64) (*.f64 phi1 phi1)) #s(literal 7/8 binary64))) (*.f64 (*.f64 phi1 phi1) (*.f64 phi1 phi1))))
(* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))
(*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))))
(* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))
(*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))))
(* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))
(*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))))
(* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))
(*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))))
(* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))
(*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))))
(* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))
(*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))))
(* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))
(*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))))
(* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))
(*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))))
(* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (pow (cos phi1) 3)))
(*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))
(+ (* -3/2 (* (pow phi2 2) (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (pow (cos phi1) 3))))) (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (pow (cos phi1) 3))))
(*.f64 (+.f64 (*.f64 #s(literal -3/2 binary64) (*.f64 phi2 phi2)) #s(literal 1 binary64)) (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))))
(+ (* (pow phi2 2) (+ (* -3/2 (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (pow (cos phi1) 3)))) (* 7/8 (* (pow phi2 2) (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (pow (cos phi1) 3))))))) (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (pow (cos phi1) 3))))
(+.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (*.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (+.f64 #s(literal -3/2 binary64) (*.f64 #s(literal 7/8 binary64) (*.f64 phi2 phi2))))))
(+ (* (pow phi2 2) (+ (* -3/2 (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (pow (cos phi1) 3)))) (* (pow phi2 2) (+ (* -61/240 (* (pow phi2 2) (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (pow (cos phi1) 3))))) (* 7/8 (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (pow (cos phi1) 3)))))))) (* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (pow (cos phi1) 3))))
(+.f64 (*.f64 (+.f64 (*.f64 #s(literal -3/2 binary64) (*.f64 phi2 phi2)) #s(literal 1 binary64)) (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (*.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal -61/240 binary64) (*.f64 phi2 phi2)) #s(literal 7/8 binary64))) (*.f64 (*.f64 phi2 phi2) (*.f64 phi2 phi2))))
(* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))
(*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))))
(* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))
(*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))))
(* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))
(*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))))
(* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))
(*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))))
(* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))
(*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))))
(* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))
(*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))))
(* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))
(*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))))
(* (pow (cos lambda1) 3) (* (pow (cos lambda2) 3) (* (pow (cos phi1) 3) (pow (cos phi2) 3))))
(*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))))
(* lambda1 (sin lambda2))
(*.f64 lambda1 (sin.f64 lambda2))
(* lambda1 (sin lambda2))
(*.f64 lambda1 (sin.f64 lambda2))
(* lambda1 (sin lambda2))
(*.f64 lambda1 (sin.f64 lambda2))
(* lambda1 (sin lambda2))
(*.f64 lambda1 (sin.f64 lambda2))
(* lambda1 (sin lambda2))
(*.f64 lambda1 (sin.f64 lambda2))
(* lambda1 (sin lambda2))
(*.f64 lambda1 (sin.f64 lambda2))
(* lambda1 (sin lambda2))
(*.f64 lambda1 (sin.f64 lambda2))
(* lambda1 (sin lambda2))
(*.f64 lambda1 (sin.f64 lambda2))
(* lambda1 (sin lambda2))
(*.f64 lambda1 (sin.f64 lambda2))
(* lambda1 (sin lambda2))
(*.f64 lambda1 (sin.f64 lambda2))
(* lambda1 (sin lambda2))
(*.f64 lambda1 (sin.f64 lambda2))
(* lambda1 (sin lambda2))
(*.f64 lambda1 (sin.f64 lambda2))
(* lambda1 lambda2)
(*.f64 lambda1 lambda2)
(* lambda2 (+ lambda1 (* -1/6 (* lambda1 (pow lambda2 2)))))
(*.f64 lambda2 (+.f64 lambda1 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda1 (*.f64 lambda2 lambda2)))))
(* lambda2 (+ lambda1 (* (pow lambda2 2) (+ (* -1/6 lambda1) (* 1/120 (* lambda1 (pow lambda2 2)))))))
(*.f64 lambda2 (+.f64 lambda1 (*.f64 (*.f64 lambda2 lambda2) (+.f64 (*.f64 lambda1 #s(literal -1/6 binary64)) (*.f64 lambda1 (*.f64 #s(literal 1/120 binary64) (*.f64 lambda2 lambda2)))))))
(* lambda2 (+ lambda1 (* (pow lambda2 2) (+ (* -1/6 lambda1) (* (pow lambda2 2) (+ (* -1/5040 (* lambda1 (pow lambda2 2))) (* 1/120 lambda1)))))))
(*.f64 lambda2 (+.f64 lambda1 (*.f64 (*.f64 lambda2 lambda2) (+.f64 (*.f64 lambda1 #s(literal -1/6 binary64)) (*.f64 (*.f64 lambda2 lambda2) (+.f64 (*.f64 (*.f64 lambda1 (*.f64 lambda2 lambda2)) #s(literal -1/5040 binary64)) (*.f64 lambda1 #s(literal 1/120 binary64))))))))
(* lambda1 (sin lambda2))
(*.f64 lambda1 (sin.f64 lambda2))
(* lambda1 (sin lambda2))
(*.f64 lambda1 (sin.f64 lambda2))
(* lambda1 (sin lambda2))
(*.f64 lambda1 (sin.f64 lambda2))
(* lambda1 (sin lambda2))
(*.f64 lambda1 (sin.f64 lambda2))
(* lambda1 (sin lambda2))
(*.f64 lambda1 (sin.f64 lambda2))
(* lambda1 (sin lambda2))
(*.f64 lambda1 (sin.f64 lambda2))
(* lambda1 (sin lambda2))
(*.f64 lambda1 (sin.f64 lambda2))
(* lambda1 (sin lambda2))
(*.f64 lambda1 (sin.f64 lambda2))
(* lambda1 (sin lambda2))
(*.f64 lambda1 (sin.f64 lambda2))
(* lambda1 (+ (sin lambda2) (* -1/6 (* (pow lambda1 2) (sin lambda2)))))
(*.f64 lambda1 (*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda1 lambda1)) #s(literal 1 binary64)) (sin.f64 lambda2)))
(* lambda1 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/6 (sin lambda2)) (* 1/120 (* (pow lambda1 2) (sin lambda2)))))))
(*.f64 lambda1 (+.f64 (sin.f64 lambda2) (*.f64 (*.f64 lambda1 lambda1) (*.f64 (sin.f64 lambda2) (+.f64 #s(literal -1/6 binary64) (*.f64 #s(literal 1/120 binary64) (*.f64 lambda1 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 lambda1 (+.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda1 lambda1)) #s(literal 1 binary64)) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda2) (+.f64 (*.f64 #s(literal -1/5040 binary64) (*.f64 lambda1 lambda1)) #s(literal 1/120 binary64))) (*.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1)))))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* lambda2 (sin lambda1))
(*.f64 (sin.f64 lambda1) lambda2)
(* lambda2 (+ (sin lambda1) (* -1/6 (* (pow lambda2 2) (sin lambda1)))))
(*.f64 lambda2 (*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda2 lambda2)) #s(literal 1 binary64)) (sin.f64 lambda1)))
(* lambda2 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/6 (sin lambda1)) (* 1/120 (* (pow lambda2 2) (sin lambda1)))))))
(*.f64 lambda2 (+.f64 (sin.f64 lambda1) (*.f64 (*.f64 lambda2 lambda2) (*.f64 (sin.f64 lambda1) (+.f64 #s(literal -1/6 binary64) (*.f64 #s(literal 1/120 binary64) (*.f64 lambda2 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 lambda2 (+.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda2 lambda2)) #s(literal 1 binary64)) (sin.f64 lambda1)) (*.f64 (*.f64 (sin.f64 lambda1) (+.f64 (*.f64 #s(literal -1/5040 binary64) (*.f64 lambda2 lambda2)) #s(literal 1/120 binary64))) (*.f64 (*.f64 lambda2 lambda2) (*.f64 lambda2 lambda2)))))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
1
#s(literal 1 binary64)
(+ 1 (* -1/2 (pow lambda1 2)))
(+.f64 #s(literal 1 binary64) (*.f64 lambda1 (*.f64 lambda1 #s(literal -1/2 binary64))))
(+ 1 (* (pow lambda1 2) (- (* 1/24 (pow lambda1 2)) 1/2)))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 lambda1 lambda1) (+.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/24 binary64) (*.f64 lambda1 lambda1)))))
(+ 1 (* (pow lambda1 2) (- (* (pow lambda1 2) (+ 1/24 (* -1/720 (pow lambda1 2)))) 1/2)))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 lambda1 lambda1) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 lambda1 lambda1) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (*.f64 lambda1 lambda1)))))))
(cos lambda1)
(cos.f64 lambda1)
(cos lambda1)
(cos.f64 lambda1)
(cos lambda1)
(cos.f64 lambda1)
(cos lambda1)
(cos.f64 lambda1)
(cos lambda1)
(cos.f64 lambda1)
(cos lambda1)
(cos.f64 lambda1)
(cos lambda1)
(cos.f64 lambda1)
(cos lambda1)
(cos.f64 lambda1)

eval221.0ms (0.9%)

Memory
19.2MiB live, 439.0MiB allocated
Compiler

Compiled 83 125 to 4 158 computations (95% saved)

prune370.0ms (1.5%)

Memory
5.0MiB live, 647.9MiB allocated
Pruning

126 alts after pruning (118 fresh and 8 done)

PrunedKeptTotal
New1 331221 353
Fresh1096106
Picked145
Done044
Total1 3421261 468
Accuracy
99.8%
Counts
1 468 → 126
Alt Table
Click to see full alt table
StatusAccuracyProgram
74.3%
(fma.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64)))) #s(literal 1/6 binary64)) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
75.0%
(fma.f64 (/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64))) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (/.f64 R (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))))
73.9%
(fma.f64 (/.f64 (*.f64 (cbrt.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64))) (cbrt.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)))) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
74.3%
(fma.f64 (/.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64)))) (PI.f64)))) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
✓75.1%
(fma.f64 (/.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64)))) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
75.3%
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64))) R) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64))))
75.1%
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64))) R) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
75.1%
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))) R))
74.9%
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))) R))
75.3%
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) R))
93.7%
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))) R))
93.4%
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))))) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))))) R))
93.6%
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))) R))
45.0%
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (+.f64 (sin.f64 lambda2) (*.f64 lambda1 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))))))))))) R))
49.3%
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))))) R))
93.3%
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))))))) R))
54.1%
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))))) R))
44.6%
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 phi1 (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
75.0%
(fma.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) R (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))))
75.7%
(/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64))) R) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
3.6%
(-.f64 #s(literal 0 binary64) (*.f64 R lambda2))
75.7%
(+.f64 (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))) (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)))
75.8%
(+.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R) (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
74.6%
(*.f64 (fma.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) R)
55.3%
(*.f64 (fma.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) R)
74.4%
(*.f64 (fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) R)
41.6%
(*.f64 (fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) R)
94.0%
(*.f64 (/.f64 (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (asin.f64 (+.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) #s(literal 2 binary64))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))) R)
42.8%
(*.f64 (/.f64 (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #s(literal 2 binary64))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) R)
5.4%
(*.f64 (/.f64 (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))) R)
5.3%
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (*.f64 lambda1 (*.f64 lambda1 lambda1))) (+.f64 (*.f64 lambda2 lambda2) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda1)))) R)
8.7%
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)) (+.f64 lambda2 lambda1)) R)
75.8%
(*.f64 (/.f64 (+.f64 (*.f64 (PI.f64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64))))) (*.f64 #s(literal 2 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)))) R)
5.3%
(*.f64 (/.f64 (+.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (pow.f64 (neg.f64 lambda1) #s(literal 3 binary64))) (+.f64 (*.f64 lambda2 lambda2) (-.f64 (*.f64 (neg.f64 lambda1) (neg.f64 lambda1)) (*.f64 lambda2 (neg.f64 lambda1))))) R)
56.4%
(*.f64 (-.f64 (/.f64 (/.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal 8 binary64)) (+.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))))) (/.f64 (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64)) (+.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))))) R)
42.8%
(*.f64 (-.f64 (/.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (/.f64 (pow.f64 (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #s(literal 2 binary64)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))) R)
2.8%
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2))) R)
5.8%
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1))) R)
75.8%
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
56.5%
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) R)
11.7%
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))) R)
42.8%
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) R)
2.6%
(*.f64 (-.f64 phi1 phi2) R)
9.4%
(*.f64 (-.f64 lambda2 lambda1) R)
1.3%
(*.f64 (*.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (+.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (-.f64 phi2 phi1)))) R)
1.0%
(*.f64 (*.f64 (/.f64 (+.f64 phi1 phi2) (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))))) (/.f64 (-.f64 phi1 phi2) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2))))) R)
19.3%
(*.f64 (fabs.f64 (remainder.f64 (-.f64 phi1 phi2) (*.f64 #s(literal 2 binary64) (PI.f64)))) R)
19.6%
(*.f64 (fabs.f64 (remainder.f64 (-.f64 lambda2 lambda1) (*.f64 #s(literal 2 binary64) (PI.f64)))) R)
53.5%
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)))) R)
76.0%
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)
34.9%
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) R)
✓30.1%
(*.f64 (acos.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) R)
15.1%
(*.f64 (acos.f64 (fma.f64 (cos.f64 lambda2) #s(literal 1 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) R)
15.3%
(*.f64 (acos.f64 (fma.f64 #s(literal 1 binary64) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) R)
75.7%
(*.f64 (acos.f64 (/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
30.0%
(*.f64 (acos.f64 (/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))))) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) R)
30.0%
(*.f64 (acos.f64 (/.f64 (+.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))) (+.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))))))) R)
42.9%
(*.f64 (acos.f64 (/.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (cos.f64 phi1)) (cos.f64 (+.f64 lambda2 lambda1)))) R)
24.8%
(*.f64 (acos.f64 (/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (cos.f64 (+.f64 lambda2 lambda1)))) R)
32.9%
(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (+.f64 (-.f64 phi1 lambda2) lambda1)))))) R)
75.8%
(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) R)
75.9%
(*.f64 (acos.f64 (-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))))) R)
33.4%
(*.f64 (acos.f64 (-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))))))) R)
60.3%
(*.f64 (acos.f64 (-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (acos.f64 (cos.f64 (-.f64 lambda1 lambda2))))))))) R)
46.2%
(*.f64 (acos.f64 (-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1)))))) R)
29.8%
(*.f64 (acos.f64 (+.f64 (/.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) R)
62.3%
(*.f64 (acos.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 3 binary64))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 phi2 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (-.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
52.2%
(*.f64 (acos.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (-.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
47.0%
(*.f64 (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 phi2 (sin.f64 phi1)))) R)
35.3%
(*.f64 (acos.f64 (+.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1))) (*.f64 phi1 (sin.f64 phi2))))) R)
39.2%
(*.f64 (acos.f64 (+.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1))) (*.f64 phi1 (sin.f64 phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
✓94.3%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)
54.2%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))) R)
26.3%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)
75.5%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (cos.f64 (+.f64 lambda2 lambda1))))))) R)
38.4%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))))) R)
✓56.6%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)))) R)
54.7%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))) R)
✓34.9%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) R)
31.7%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) R)
32.0%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))) R)
30.1%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) R)
16.0%
(*.f64 (acos.f64 (+.f64 (*.f64 (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))))) R)
53.4%
(*.f64 (acos.f64 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
36.8%
(*.f64 (acos.f64 (+.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 phi1 (sin.f64 phi2)))) R)
36.4%
(*.f64 (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 phi2 (sin.f64 phi1)))) R)
34.1%
(*.f64 (acos.f64 (+.f64 (*.f64 phi2 (sin.f64 phi1)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 phi2 (*.f64 phi2 #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
59.0%
(*.f64 (acos.f64 (+.f64 (*.f64 phi2 (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
37.7%
(*.f64 (acos.f64 (+.f64 (*.f64 phi1 (*.f64 (sin.f64 phi2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal 1/120 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
35.2%
(*.f64 (acos.f64 (+.f64 (*.f64 phi1 (sin.f64 phi2)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
57.8%
(*.f64 (acos.f64 (+.f64 (*.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)
45.3%
(*.f64 (acos.f64 (+.f64 (*.f64 phi1 (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
25.9%
(*.f64 (acos.f64 (+.f64 (*.f64 phi1 (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) R)
17.1%
(*.f64 (acos.f64 (+.f64 (*.f64 #s(literal 0 binary64) (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2)))) (*.f64 #s(literal 1 binary64) (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2)))))) R)
14.6%
(*.f64 (acos.f64 (+.f64 (cos.f64 phi2) (*.f64 phi1 (sin.f64 phi2)))) R)
11.4%
(*.f64 (acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (+.f64 (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (*.f64 lambda1 #s(literal -1/2 binary64))))))) R)
✓11.7%
(*.f64 (acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))) R)
11.5%
(*.f64 (acos.f64 (+.f64 (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) lambda2))) R)
2.7%
(*.f64 (acos.f64 (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2))) R)
53.3%
(*.f64 (acos.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))) R)
53.5%
(*.f64 (acos.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1))) R)
17.7%
(*.f64 (acos.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1/2 binary64) (*.f64 phi1 (*.f64 phi1 (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64)))))))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
17.6%
(*.f64 (acos.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1/2 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal 1/24 binary64)))))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
17.5%
(*.f64 (acos.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
43.1%
(*.f64 (acos.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) R)
53.5%
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) R)
53.5%
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) R)
24.5%
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))) R)
25.0%
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (sin.f64 lambda1)) (+.f64 (*.f64 lambda2 (*.f64 lambda2 #s(literal 1/6 binary64))) #s(literal -1 binary64)))))))) R)
25.0%
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (+.f64 (sin.f64 lambda1) (*.f64 lambda2 (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64)))))))) R)
26.6%
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))) R)
31.0%
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 lambda2))) R)
32.2%
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 lambda1))) R)
32.1%
(*.f64 (acos.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) R)
12.1%
(*.f64 (acos.f64 (*.f64 lambda1 (sin.f64 lambda2))) R)
15.7%
(*.f64 (acos.f64 (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))) R)
5.3%
(*.f64 (acos.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))))))) R)
29.5%
(*.f64 (acos.f64 (cos.f64 (-.f64 phi2 phi1))) R)
✓24.8%
(*.f64 (acos.f64 (cos.f64 (-.f64 lambda1 lambda2))) R)
16.0%
(*.f64 (acos.f64 (cos.f64 (fabs.f64 (remainder.f64 (-.f64 lambda1 lambda2) (*.f64 #s(literal 2 binary64) (PI.f64)))))) R)
19.2%
(*.f64 (acos.f64 (cos.f64 phi2)) R)
18.6%
(*.f64 (acos.f64 (cos.f64 phi1)) R)
16.4%
(*.f64 (acos.f64 (cos.f64 lambda2)) R)
16.5%
(*.f64 (acos.f64 (cos.f64 lambda1)) R)
4.7%
(*.f64 (acos.f64 #s(literal 1 binary64)) R)
✓3.9%
(*.f64 lambda1 R)
Compiler

Compiled 9 009 to 3 382 computations (62.5% saved)

regimes598.0ms (2.4%)

Memory
-14.2MiB live, 886.0MiB allocated
Counts
179 → 2
Calls
Call 1
Inputs
(*.f64 lambda1 R)
(*.f64 (-.f64 lambda2 lambda1) R)
(*.f64 (-.f64 phi1 phi2) R)
(-.f64 #s(literal 0 binary64) (*.f64 R lambda2))
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2))) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2)) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)) (+.f64 lambda2 lambda1)) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (*.f64 lambda1 (*.f64 lambda1 lambda1))) (+.f64 (*.f64 lambda2 lambda2) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda2)))) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (*.f64 lambda1 (*.f64 lambda1 lambda1))) (+.f64 (*.f64 lambda2 lambda2) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda1)))) R)
(*.f64 (*.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (+.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (-.f64 phi2 phi1)))) R)
(*.f64 (/.f64 (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))) R)
(*.f64 (*.f64 (/.f64 (+.f64 phi1 phi2) (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))))) (/.f64 (-.f64 phi1 phi2) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2))))) R)
(*.f64 (acos.f64 #s(literal 1 binary64)) R)
(*.f64 (acos.f64 (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2))) R)
(*.f64 (/.f64 (+.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (pow.f64 (neg.f64 lambda1) #s(literal 3 binary64))) (+.f64 (*.f64 lambda2 lambda2) (-.f64 (*.f64 (neg.f64 lambda1) (neg.f64 lambda1)) (*.f64 lambda2 (neg.f64 lambda1))))) R)
(*.f64 (acos.f64 (cos.f64 lambda1)) R)
(*.f64 (acos.f64 (cos.f64 lambda2)) R)
(*.f64 (acos.f64 (cos.f64 phi1)) R)
(*.f64 (acos.f64 (cos.f64 phi2)) R)
(*.f64 (acos.f64 (cos.f64 (-.f64 lambda1 lambda2))) R)
(*.f64 (acos.f64 (cos.f64 (-.f64 phi2 phi1))) R)
(*.f64 (acos.f64 (*.f64 lambda1 (sin.f64 lambda2))) R)
(*.f64 (fabs.f64 (remainder.f64 (-.f64 lambda1 lambda2) (*.f64 #s(literal 2 binary64) (PI.f64)))) R)
(*.f64 (fabs.f64 (remainder.f64 (-.f64 lambda2 lambda1) (*.f64 #s(literal 2 binary64) (PI.f64)))) R)
(*.f64 (fabs.f64 (remainder.f64 (-.f64 phi1 phi2) (*.f64 #s(literal 2 binary64) (PI.f64)))) R)
(*.f64 (acos.f64 (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))) R)
(*.f64 (acos.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1/2 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal 1/24 binary64)))))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))))))) R)
(*.f64 (acos.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1/2 binary64) (*.f64 phi1 (*.f64 phi1 (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64)))))))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 lambda1))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 lambda2))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))) R)
(*.f64 (acos.f64 (+.f64 (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) lambda2))) R)
(*.f64 (acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))) R)
(*.f64 (acos.f64 (+.f64 (cos.f64 phi2) (*.f64 phi1 (sin.f64 phi2)))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))) R)
(*.f64 (acos.f64 (/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi1)) (cos.f64 (-.f64 (-.f64 lambda1 lambda2) phi1))) #s(literal 2 binary64))) R)
(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (+.f64 (-.f64 phi1 lambda2) lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 #s(literal 0 binary64) (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2)))) (*.f64 #s(literal 1 binary64) (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 (cos.f64 (fabs.f64 (remainder.f64 (-.f64 lambda1 lambda2) (*.f64 #s(literal 2 binary64) (PI.f64)))))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 phi1 (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 phi2 (sin.f64 phi1)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 phi1 (sin.f64 phi2)))) R)
(*.f64 (acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (+.f64 (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (*.f64 lambda1 #s(literal -1/2 binary64))))))) R)
(*.f64 (acos.f64 (/.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (cos.f64 (+.f64 lambda1 lambda2)))) R)
(*.f64 (acos.f64 (/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (cos.f64 (+.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 phi1 (sin.f64 phi2)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 phi2 (sin.f64 phi1)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 phi2 (*.f64 phi2 #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1))) (*.f64 phi1 (sin.f64 phi2))))) R)
(*.f64 (acos.f64 (fma.f64 #s(literal 1 binary64) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) R)
(*.f64 (acos.f64 (fma.f64 (cos.f64 lambda2) #s(literal 1 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 phi1 (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (+.f64 (sin.f64 lambda1) (*.f64 lambda2 (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64)))))))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (+.f64 (sin.f64 lambda2) (*.f64 lambda1 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)))))))) R)
(*.f64 (acos.f64 (+.f64 (/.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (/.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (cos.f64 phi1)) (cos.f64 (+.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1))) (*.f64 phi1 (sin.f64 phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (sin.f64 lambda1)) (+.f64 (*.f64 lambda2 (*.f64 lambda2 #s(literal 1/6 binary64))) #s(literal -1 binary64)))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 phi1 (*.f64 (sin.f64 phi2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal 1/120 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) R)
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1))) R)
(*.f64 (acos.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)))) R)
(*.f64 (fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (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 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 (-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1)))))) R)
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 phi1 (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
(+.f64 (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))) (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)))
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (-.f64 phi2 lambda1) lambda2))) (cos.f64 phi1)) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 (-.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 (-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
(+.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R) (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (-.f64 #s(literal 0 binary64) (+.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 (-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))))))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) (*.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)) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 phi2 (sin.f64 phi1)))) R)
(*.f64 (acos.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))))) R))
(fma.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) R (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))))
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) R))
(*.f64 (/.f64 (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #s(literal 2 binary64))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (+.f64 (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (*.f64 lambda2 #s(literal -1/2 binary64))))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (+.f64 (*.f64 lambda1 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))) (sin.f64 lambda2))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (cos.f64 (+.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 (-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (acos.f64 (cos.f64 (-.f64 lambda1 lambda2))))))))) R)
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.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)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 lambda1 lambda2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))))))) R)
(fma.f64 (/.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64)))) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (+.f64 (*.f64 (cos.f64 lambda1) (*.f64 lambda2 #s(literal -1/2 binary64))) (*.f64 (sin.f64 lambda1) (+.f64 #s(literal 1 binary64) (*.f64 lambda2 (*.f64 lambda2 #s(literal -1/6 binary64))))))))))) R)
(fma.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64)))) #s(literal 1/6 binary64)) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
(*.f64 (acos.f64 (+.f64 (*.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 (+.f64 (*.f64 phi2 (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)
(*.f64 (fma.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) R)
(*.f64 (fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) R)
(*.f64 (fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) R)
(*.f64 (fma.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) R)
(fma.f64 (/.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
(*.f64 (fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) R)
(*.f64 (acos.f64 (-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))))) R)
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (+.f64 (sin.f64 lambda2) (*.f64 lambda1 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))))))))))) R))
(fma.f64 (/.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64)))) (PI.f64)))) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
(*.f64 (acos.f64 (/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))))) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 (/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))))) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.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)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (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 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.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 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))) R))
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))) R))
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))) R))
(*.f64 (-.f64 (/.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) (/.f64 (pow.f64 (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #s(literal 2 binary64)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))))) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))) R))
(fma.f64 (/.f64 (*.f64 (cbrt.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64))) (cbrt.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)))) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (cos.f64 (+.f64 lambda1 lambda2))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (cos.f64 (+.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (cos.f64 (+.f64 lambda2 lambda1))))))) R)
(*.f64 (acos.f64 (/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
(*.f64 (-.f64 (PI.f64) (acos.f64 (/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))))) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64))) R) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (-.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (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)) (/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))))) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))) R)
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64))) R) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))))) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))))) R))
(*.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64))) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal -2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) R)
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64))) R) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64))))
(*.f64 (acos.f64 (/.f64 (+.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))) (+.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))))))) R)
(*.f64 (acos.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (cos.f64 phi1)) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) R)
(*.f64 (acos.f64 (+.f64 (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (sin.f64 phi2) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (/.f64 (sin.f64 phi2) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (neg.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))) R)
(*.f64 (acos.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 4 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 4 binary64))) (*.f64 (-.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2)))))))))) 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 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))))) R)
(*.f64 (-.f64 (/.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (/.f64 (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))) R)
(fma.f64 (/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64))) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (/.f64 R (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))))
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))))))) R))
(*.f64 (/.f64 (+.f64 (*.f64 (PI.f64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64))))) (*.f64 #s(literal 2 binary64) (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)))) R)
(*.f64 (/.f64 (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (asin.f64 (+.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) #s(literal 2 binary64))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))) R)
(*.f64 (acos.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 3 binary64))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (*.f64 phi2 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (-.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 3 binary64))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (-.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi2))))) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (-.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (-.f64 (/.f64 (/.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal 8 binary64)) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (/.f64 (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 3 binary64)) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))) R)
(*.f64 (-.f64 (/.f64 (/.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal 8 binary64)) (+.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))))) (/.f64 (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 3 binary64)) (+.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (pow.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) #s(literal 2 binary64)) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))))) R)
Outputs
(*.f64 (-.f64 lambda2 lambda1) 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 lambda1) (sin.f64 lambda2)))))) R)
Calls

10 calls:

77.0ms
lambda2
61.0ms
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
56.0ms
lambda1
54.0ms
phi1
53.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
94.3%1R
94.3%1lambda1
94.3%1lambda2
94.3%1phi1
94.3%1phi2
97.4%2(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
97.4%2(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
97.4%2(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
94.3%1(cos.f64 (-.f64 lambda1 lambda2))
94.3%1(-.f64 lambda1 lambda2)
Compiler

Compiled 114 to 86 computations (24.6% saved)

regimes168.0ms (0.7%)

Memory
9.1MiB live, 277.3MiB allocated
Counts
139 → 2
Calls
Call 1
Inputs
(*.f64 lambda1 R)
(*.f64 (-.f64 lambda2 lambda1) R)
(*.f64 (-.f64 phi1 phi2) R)
(-.f64 #s(literal 0 binary64) (*.f64 R lambda2))
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2))) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2)) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)) (+.f64 lambda2 lambda1)) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (*.f64 lambda1 (*.f64 lambda1 lambda1))) (+.f64 (*.f64 lambda2 lambda2) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda2)))) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (*.f64 lambda1 (*.f64 lambda1 lambda1))) (+.f64 (*.f64 lambda2 lambda2) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda1)))) R)
(*.f64 (*.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (+.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (-.f64 phi2 phi1)))) R)
(*.f64 (/.f64 (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))) R)
(*.f64 (*.f64 (/.f64 (+.f64 phi1 phi2) (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))))) (/.f64 (-.f64 phi1 phi2) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2))))) R)
(*.f64 (acos.f64 #s(literal 1 binary64)) R)
(*.f64 (acos.f64 (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2))) R)
(*.f64 (/.f64 (+.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (pow.f64 (neg.f64 lambda1) #s(literal 3 binary64))) (+.f64 (*.f64 lambda2 lambda2) (-.f64 (*.f64 (neg.f64 lambda1) (neg.f64 lambda1)) (*.f64 lambda2 (neg.f64 lambda1))))) R)
(*.f64 (acos.f64 (cos.f64 lambda1)) R)
(*.f64 (acos.f64 (cos.f64 lambda2)) R)
(*.f64 (acos.f64 (cos.f64 phi1)) R)
(*.f64 (acos.f64 (cos.f64 phi2)) R)
(*.f64 (acos.f64 (cos.f64 (-.f64 lambda1 lambda2))) R)
(*.f64 (acos.f64 (cos.f64 (-.f64 phi2 phi1))) R)
(*.f64 (acos.f64 (*.f64 lambda1 (sin.f64 lambda2))) R)
(*.f64 (fabs.f64 (remainder.f64 (-.f64 lambda1 lambda2) (*.f64 #s(literal 2 binary64) (PI.f64)))) R)
(*.f64 (fabs.f64 (remainder.f64 (-.f64 lambda2 lambda1) (*.f64 #s(literal 2 binary64) (PI.f64)))) R)
(*.f64 (fabs.f64 (remainder.f64 (-.f64 phi1 phi2) (*.f64 #s(literal 2 binary64) (PI.f64)))) R)
(*.f64 (acos.f64 (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))) R)
(*.f64 (acos.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1/2 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal 1/24 binary64)))))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))))))) R)
(*.f64 (acos.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1/2 binary64) (*.f64 phi1 (*.f64 phi1 (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64)))))))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 lambda1))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 lambda2))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))) R)
(*.f64 (acos.f64 (+.f64 (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) lambda2))) R)
(*.f64 (acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))) R)
(*.f64 (acos.f64 (+.f64 (cos.f64 phi2) (*.f64 phi1 (sin.f64 phi2)))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))) R)
(*.f64 (acos.f64 (/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi1)) (cos.f64 (-.f64 (-.f64 lambda1 lambda2) phi1))) #s(literal 2 binary64))) R)
(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (+.f64 (-.f64 phi1 lambda2) lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 #s(literal 0 binary64) (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2)))) (*.f64 #s(literal 1 binary64) (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 (cos.f64 (fabs.f64 (remainder.f64 (-.f64 lambda1 lambda2) (*.f64 #s(literal 2 binary64) (PI.f64)))))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 phi1 (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 phi2 (sin.f64 phi1)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 phi1 (sin.f64 phi2)))) R)
(*.f64 (acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (+.f64 (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (*.f64 lambda1 #s(literal -1/2 binary64))))))) R)
(*.f64 (acos.f64 (/.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (cos.f64 (+.f64 lambda1 lambda2)))) R)
(*.f64 (acos.f64 (/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (cos.f64 (+.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 phi1 (sin.f64 phi2)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 phi2 (sin.f64 phi1)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 phi2 (*.f64 phi2 #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1))) (*.f64 phi1 (sin.f64 phi2))))) R)
(*.f64 (acos.f64 (fma.f64 #s(literal 1 binary64) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) R)
(*.f64 (acos.f64 (fma.f64 (cos.f64 lambda2) #s(literal 1 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 phi1 (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (+.f64 (sin.f64 lambda1) (*.f64 lambda2 (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64)))))))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (+.f64 (sin.f64 lambda2) (*.f64 lambda1 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)))))))) R)
(*.f64 (acos.f64 (+.f64 (/.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (/.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (cos.f64 phi1)) (cos.f64 (+.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1))) (*.f64 phi1 (sin.f64 phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (sin.f64 lambda1)) (+.f64 (*.f64 lambda2 (*.f64 lambda2 #s(literal 1/6 binary64))) #s(literal -1 binary64)))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 phi1 (*.f64 (sin.f64 phi2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal 1/120 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) R)
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1))) R)
(*.f64 (acos.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)))) R)
(*.f64 (fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (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 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 (-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1)))))) R)
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 phi1 (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
(+.f64 (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))) (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)))
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (-.f64 phi2 lambda1) lambda2))) (cos.f64 phi1)) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 (-.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 (-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
(+.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R) (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (-.f64 #s(literal 0 binary64) (+.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 (-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))))))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) (*.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)) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 phi2 (sin.f64 phi1)))) R)
(*.f64 (acos.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))))) R))
(fma.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) R (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))))
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) R))
(*.f64 (/.f64 (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #s(literal 2 binary64))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (+.f64 (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (*.f64 lambda2 #s(literal -1/2 binary64))))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (+.f64 (*.f64 lambda1 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))) (sin.f64 lambda2))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (cos.f64 (+.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 (-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (acos.f64 (cos.f64 (-.f64 lambda1 lambda2))))))))) R)
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.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)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 lambda1 lambda2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))))))) R)
(fma.f64 (/.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64)))) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (+.f64 (*.f64 (cos.f64 lambda1) (*.f64 lambda2 #s(literal -1/2 binary64))) (*.f64 (sin.f64 lambda1) (+.f64 #s(literal 1 binary64) (*.f64 lambda2 (*.f64 lambda2 #s(literal -1/6 binary64))))))))))) R)
(fma.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64)))) #s(literal 1/6 binary64)) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
(*.f64 (acos.f64 (+.f64 (*.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 (+.f64 (*.f64 phi2 (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)
(*.f64 (fma.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) R)
(*.f64 (fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) R)
(*.f64 (fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) R)
(*.f64 (fma.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) R)
(fma.f64 (/.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
(*.f64 (fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) R)
(*.f64 (acos.f64 (-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))))) R)
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (+.f64 (sin.f64 lambda2) (*.f64 lambda1 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))))))))))) R))
(fma.f64 (/.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64)))) (PI.f64)))) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
(*.f64 (acos.f64 (/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))))) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 (/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))))) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) R)
Outputs
(*.f64 (-.f64 lambda2 lambda1) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
Calls

3 calls:

56.0ms
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
42.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)
39.0ms
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
Results
AccuracySegmentsBranch
97.4%2(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
97.4%2(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
97.4%2(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 67 to 48 computations (28.4% saved)

regimes434.0ms (1.8%)

Memory
-7.2MiB live, 627.1MiB allocated
Counts
126 → 3
Calls
Call 1
Inputs
(*.f64 lambda1 R)
(*.f64 (-.f64 lambda2 lambda1) R)
(*.f64 (-.f64 phi1 phi2) R)
(-.f64 #s(literal 0 binary64) (*.f64 R lambda2))
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2))) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2)) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)) (+.f64 lambda2 lambda1)) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (*.f64 lambda1 (*.f64 lambda1 lambda1))) (+.f64 (*.f64 lambda2 lambda2) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda2)))) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (*.f64 lambda1 (*.f64 lambda1 lambda1))) (+.f64 (*.f64 lambda2 lambda2) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda1)))) R)
(*.f64 (*.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (+.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (-.f64 phi2 phi1)))) R)
(*.f64 (/.f64 (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))) R)
(*.f64 (*.f64 (/.f64 (+.f64 phi1 phi2) (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))))) (/.f64 (-.f64 phi1 phi2) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2))))) R)
(*.f64 (acos.f64 #s(literal 1 binary64)) R)
(*.f64 (acos.f64 (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2))) R)
(*.f64 (/.f64 (+.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (pow.f64 (neg.f64 lambda1) #s(literal 3 binary64))) (+.f64 (*.f64 lambda2 lambda2) (-.f64 (*.f64 (neg.f64 lambda1) (neg.f64 lambda1)) (*.f64 lambda2 (neg.f64 lambda1))))) R)
(*.f64 (acos.f64 (cos.f64 lambda1)) R)
(*.f64 (acos.f64 (cos.f64 lambda2)) R)
(*.f64 (acos.f64 (cos.f64 phi1)) R)
(*.f64 (acos.f64 (cos.f64 phi2)) R)
(*.f64 (acos.f64 (cos.f64 (-.f64 lambda1 lambda2))) R)
(*.f64 (acos.f64 (cos.f64 (-.f64 phi2 phi1))) R)
(*.f64 (acos.f64 (*.f64 lambda1 (sin.f64 lambda2))) R)
(*.f64 (fabs.f64 (remainder.f64 (-.f64 lambda1 lambda2) (*.f64 #s(literal 2 binary64) (PI.f64)))) R)
(*.f64 (fabs.f64 (remainder.f64 (-.f64 lambda2 lambda1) (*.f64 #s(literal 2 binary64) (PI.f64)))) R)
(*.f64 (fabs.f64 (remainder.f64 (-.f64 phi1 phi2) (*.f64 #s(literal 2 binary64) (PI.f64)))) R)
(*.f64 (acos.f64 (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))) R)
(*.f64 (acos.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1/2 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal 1/24 binary64)))))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))))))) R)
(*.f64 (acos.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1/2 binary64) (*.f64 phi1 (*.f64 phi1 (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64)))))))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 lambda1))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 lambda2))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))) R)
(*.f64 (acos.f64 (+.f64 (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) lambda2))) R)
(*.f64 (acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))) R)
(*.f64 (acos.f64 (+.f64 (cos.f64 phi2) (*.f64 phi1 (sin.f64 phi2)))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))) R)
(*.f64 (acos.f64 (/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi1)) (cos.f64 (-.f64 (-.f64 lambda1 lambda2) phi1))) #s(literal 2 binary64))) R)
(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (+.f64 (-.f64 phi1 lambda2) lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 #s(literal 0 binary64) (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2)))) (*.f64 #s(literal 1 binary64) (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 (cos.f64 (fabs.f64 (remainder.f64 (-.f64 lambda1 lambda2) (*.f64 #s(literal 2 binary64) (PI.f64)))))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 phi1 (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 phi2 (sin.f64 phi1)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 phi1 (sin.f64 phi2)))) R)
(*.f64 (acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (+.f64 (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (*.f64 lambda1 #s(literal -1/2 binary64))))))) R)
(*.f64 (acos.f64 (/.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (cos.f64 (+.f64 lambda1 lambda2)))) R)
(*.f64 (acos.f64 (/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (cos.f64 (+.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 phi1 (sin.f64 phi2)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 phi2 (sin.f64 phi1)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 phi2 (*.f64 phi2 #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1))) (*.f64 phi1 (sin.f64 phi2))))) R)
(*.f64 (acos.f64 (fma.f64 #s(literal 1 binary64) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) R)
(*.f64 (acos.f64 (fma.f64 (cos.f64 lambda2) #s(literal 1 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 phi1 (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (+.f64 (sin.f64 lambda1) (*.f64 lambda2 (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64)))))))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (+.f64 (sin.f64 lambda2) (*.f64 lambda1 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)))))))) R)
(*.f64 (acos.f64 (+.f64 (/.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (/.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (cos.f64 phi1)) (cos.f64 (+.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1))) (*.f64 phi1 (sin.f64 phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (sin.f64 lambda1)) (+.f64 (*.f64 lambda2 (*.f64 lambda2 #s(literal 1/6 binary64))) #s(literal -1 binary64)))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 phi1 (*.f64 (sin.f64 phi2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal 1/120 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) R)
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1))) R)
(*.f64 (acos.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)))) R)
(*.f64 (fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (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 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 (-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1)))))) R)
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 phi1 (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
(+.f64 (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))) (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)))
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (-.f64 phi2 lambda1) lambda2))) (cos.f64 phi1)) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 (-.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 (-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
(+.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R) (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (-.f64 #s(literal 0 binary64) (+.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 (-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))))))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) (*.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)) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 phi2 (sin.f64 phi1)))) R)
(*.f64 (acos.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))))) R))
(fma.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) R (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))))
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) R))
(*.f64 (/.f64 (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #s(literal 2 binary64))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (+.f64 (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (*.f64 lambda2 #s(literal -1/2 binary64))))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (+.f64 (*.f64 lambda1 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))) (sin.f64 lambda2))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (cos.f64 (+.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 (-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (acos.f64 (cos.f64 (-.f64 lambda1 lambda2))))))))) R)
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.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)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 lambda1 lambda2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))))))) R)
(fma.f64 (/.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64)))) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (+.f64 (*.f64 (cos.f64 lambda1) (*.f64 lambda2 #s(literal -1/2 binary64))) (*.f64 (sin.f64 lambda1) (+.f64 #s(literal 1 binary64) (*.f64 lambda2 (*.f64 lambda2 #s(literal -1/6 binary64))))))))))) R)
(fma.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64)))) #s(literal 1/6 binary64)) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
(*.f64 (acos.f64 (+.f64 (*.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 (+.f64 (*.f64 phi2 (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) R)
Outputs
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 phi2 (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
Calls

10 calls:

67.0ms
lambda2
48.0ms
(cos.f64 (-.f64 lambda1 lambda2))
39.0ms
phi1
38.0ms
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
37.0ms
(-.f64 lambda1 lambda2)
Results
AccuracySegmentsBranch
76.0%1R
86.1%3phi1
86.6%3phi2
77.6%2(cos.f64 (-.f64 lambda1 lambda2))
79.4%3(-.f64 lambda1 lambda2)
80.5%2lambda1
82.9%3lambda2
79.0%2(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
79.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)
79.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)))))
Compiler

Compiled 114 to 86 computations (24.6% saved)

regimes57.0ms (0.2%)

Memory
32.7MiB live, 110.7MiB allocated
Counts
124 → 3
Calls
Call 1
Inputs
(*.f64 lambda1 R)
(*.f64 (-.f64 lambda2 lambda1) R)
(*.f64 (-.f64 phi1 phi2) R)
(-.f64 #s(literal 0 binary64) (*.f64 R lambda2))
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2))) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2)) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)) (+.f64 lambda2 lambda1)) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (*.f64 lambda1 (*.f64 lambda1 lambda1))) (+.f64 (*.f64 lambda2 lambda2) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda2)))) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (*.f64 lambda1 (*.f64 lambda1 lambda1))) (+.f64 (*.f64 lambda2 lambda2) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda1)))) R)
(*.f64 (*.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (+.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (-.f64 phi2 phi1)))) R)
(*.f64 (/.f64 (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))) R)
(*.f64 (*.f64 (/.f64 (+.f64 phi1 phi2) (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))))) (/.f64 (-.f64 phi1 phi2) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2))))) R)
(*.f64 (acos.f64 #s(literal 1 binary64)) R)
(*.f64 (acos.f64 (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2))) R)
(*.f64 (/.f64 (+.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (pow.f64 (neg.f64 lambda1) #s(literal 3 binary64))) (+.f64 (*.f64 lambda2 lambda2) (-.f64 (*.f64 (neg.f64 lambda1) (neg.f64 lambda1)) (*.f64 lambda2 (neg.f64 lambda1))))) R)
(*.f64 (acos.f64 (cos.f64 lambda1)) R)
(*.f64 (acos.f64 (cos.f64 lambda2)) R)
(*.f64 (acos.f64 (cos.f64 phi1)) R)
(*.f64 (acos.f64 (cos.f64 phi2)) R)
(*.f64 (acos.f64 (cos.f64 (-.f64 lambda1 lambda2))) R)
(*.f64 (acos.f64 (cos.f64 (-.f64 phi2 phi1))) R)
(*.f64 (acos.f64 (*.f64 lambda1 (sin.f64 lambda2))) R)
(*.f64 (fabs.f64 (remainder.f64 (-.f64 lambda1 lambda2) (*.f64 #s(literal 2 binary64) (PI.f64)))) R)
(*.f64 (fabs.f64 (remainder.f64 (-.f64 lambda2 lambda1) (*.f64 #s(literal 2 binary64) (PI.f64)))) R)
(*.f64 (fabs.f64 (remainder.f64 (-.f64 phi1 phi2) (*.f64 #s(literal 2 binary64) (PI.f64)))) R)
(*.f64 (acos.f64 (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))) R)
(*.f64 (acos.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1/2 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal 1/24 binary64)))))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))))))) R)
(*.f64 (acos.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1/2 binary64) (*.f64 phi1 (*.f64 phi1 (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64)))))))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 lambda1))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 lambda2))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))) R)
(*.f64 (acos.f64 (+.f64 (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) lambda2))) R)
(*.f64 (acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))) R)
(*.f64 (acos.f64 (+.f64 (cos.f64 phi2) (*.f64 phi1 (sin.f64 phi2)))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))) R)
(*.f64 (acos.f64 (/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi1)) (cos.f64 (-.f64 (-.f64 lambda1 lambda2) phi1))) #s(literal 2 binary64))) R)
(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (+.f64 (-.f64 phi1 lambda2) lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 #s(literal 0 binary64) (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2)))) (*.f64 #s(literal 1 binary64) (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 (cos.f64 (fabs.f64 (remainder.f64 (-.f64 lambda1 lambda2) (*.f64 #s(literal 2 binary64) (PI.f64)))))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 phi1 (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 phi2 (sin.f64 phi1)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 phi1 (sin.f64 phi2)))) R)
(*.f64 (acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (+.f64 (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (*.f64 lambda1 #s(literal -1/2 binary64))))))) R)
(*.f64 (acos.f64 (/.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (cos.f64 (+.f64 lambda1 lambda2)))) R)
(*.f64 (acos.f64 (/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (cos.f64 (+.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 phi1 (sin.f64 phi2)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 phi2 (sin.f64 phi1)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 phi2 (*.f64 phi2 #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1))) (*.f64 phi1 (sin.f64 phi2))))) R)
(*.f64 (acos.f64 (fma.f64 #s(literal 1 binary64) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) R)
(*.f64 (acos.f64 (fma.f64 (cos.f64 lambda2) #s(literal 1 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 phi1 (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (+.f64 (sin.f64 lambda1) (*.f64 lambda2 (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64)))))))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (+.f64 (sin.f64 lambda2) (*.f64 lambda1 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)))))))) R)
(*.f64 (acos.f64 (+.f64 (/.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (/.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (cos.f64 phi1)) (cos.f64 (+.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1))) (*.f64 phi1 (sin.f64 phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (sin.f64 lambda1)) (+.f64 (*.f64 lambda2 (*.f64 lambda2 #s(literal 1/6 binary64))) #s(literal -1 binary64)))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 phi1 (*.f64 (sin.f64 phi2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal 1/120 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) R)
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1))) R)
(*.f64 (acos.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)))) R)
(*.f64 (fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (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 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 (-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1)))))) R)
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 phi1 (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
(+.f64 (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))) (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)))
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (-.f64 phi2 lambda1) lambda2))) (cos.f64 phi1)) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 (-.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 (-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
(+.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R) (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (-.f64 #s(literal 0 binary64) (+.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 (-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))))))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) (*.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)) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 phi2 (sin.f64 phi1)))) R)
(*.f64 (acos.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))))) R))
(fma.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) R (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))))
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) R))
(*.f64 (/.f64 (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))) #s(literal 2 binary64))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi1)) (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (+.f64 (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (*.f64 lambda2 #s(literal -1/2 binary64))))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (+.f64 (*.f64 lambda1 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))) (sin.f64 lambda2))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (cos.f64 (+.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 (-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (acos.f64 (cos.f64 (-.f64 lambda1 lambda2))))))))) R)
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.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)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 lambda1 lambda2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))))))) R)
(fma.f64 (/.f64 (cbrt.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64)))) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (+.f64 (*.f64 (cos.f64 lambda1) (*.f64 lambda2 #s(literal -1/2 binary64))) (*.f64 (sin.f64 lambda1) (+.f64 #s(literal 1 binary64) (*.f64 lambda2 (*.f64 lambda2 #s(literal -1/6 binary64))))))))))) R)
(fma.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64)))) #s(literal 1/6 binary64)) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
(*.f64 (acos.f64 (+.f64 (*.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)
Outputs
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 phi2 (sin.f64 phi1)))) R)
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
Calls

1 calls:

36.0ms
phi2
Results
AccuracySegmentsBranch
86.6%3phi2
Compiler

Compiled 6 to 5 computations (16.7% saved)

regimes68.0ms (0.3%)

Memory
-26.0MiB live, 137.1MiB allocated
Counts
103 → 3
Calls
Call 1
Inputs
(*.f64 lambda1 R)
(*.f64 (-.f64 lambda2 lambda1) R)
(*.f64 (-.f64 phi1 phi2) R)
(-.f64 #s(literal 0 binary64) (*.f64 R lambda2))
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2))) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2)) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)) (+.f64 lambda2 lambda1)) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (*.f64 lambda1 (*.f64 lambda1 lambda1))) (+.f64 (*.f64 lambda2 lambda2) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda2)))) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (*.f64 lambda1 (*.f64 lambda1 lambda1))) (+.f64 (*.f64 lambda2 lambda2) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda1)))) R)
(*.f64 (*.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (+.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (-.f64 phi2 phi1)))) R)
(*.f64 (/.f64 (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))) R)
(*.f64 (*.f64 (/.f64 (+.f64 phi1 phi2) (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))))) (/.f64 (-.f64 phi1 phi2) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2))))) R)
(*.f64 (acos.f64 #s(literal 1 binary64)) R)
(*.f64 (acos.f64 (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2))) R)
(*.f64 (/.f64 (+.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (pow.f64 (neg.f64 lambda1) #s(literal 3 binary64))) (+.f64 (*.f64 lambda2 lambda2) (-.f64 (*.f64 (neg.f64 lambda1) (neg.f64 lambda1)) (*.f64 lambda2 (neg.f64 lambda1))))) R)
(*.f64 (acos.f64 (cos.f64 lambda1)) R)
(*.f64 (acos.f64 (cos.f64 lambda2)) R)
(*.f64 (acos.f64 (cos.f64 phi1)) R)
(*.f64 (acos.f64 (cos.f64 phi2)) R)
(*.f64 (acos.f64 (cos.f64 (-.f64 lambda1 lambda2))) R)
(*.f64 (acos.f64 (cos.f64 (-.f64 phi2 phi1))) R)
(*.f64 (acos.f64 (*.f64 lambda1 (sin.f64 lambda2))) R)
(*.f64 (fabs.f64 (remainder.f64 (-.f64 lambda1 lambda2) (*.f64 #s(literal 2 binary64) (PI.f64)))) R)
(*.f64 (fabs.f64 (remainder.f64 (-.f64 lambda2 lambda1) (*.f64 #s(literal 2 binary64) (PI.f64)))) R)
(*.f64 (fabs.f64 (remainder.f64 (-.f64 phi1 phi2) (*.f64 #s(literal 2 binary64) (PI.f64)))) R)
(*.f64 (acos.f64 (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))) R)
(*.f64 (acos.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1/2 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal 1/24 binary64)))))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))))))) R)
(*.f64 (acos.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1/2 binary64) (*.f64 phi1 (*.f64 phi1 (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64)))))))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 lambda1))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 lambda2))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))) R)
(*.f64 (acos.f64 (+.f64 (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) lambda2))) R)
(*.f64 (acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))) R)
(*.f64 (acos.f64 (+.f64 (cos.f64 phi2) (*.f64 phi1 (sin.f64 phi2)))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))) R)
(*.f64 (acos.f64 (/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi1)) (cos.f64 (-.f64 (-.f64 lambda1 lambda2) phi1))) #s(literal 2 binary64))) R)
(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (+.f64 (-.f64 phi1 lambda2) lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 #s(literal 0 binary64) (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2)))) (*.f64 #s(literal 1 binary64) (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 (cos.f64 (fabs.f64 (remainder.f64 (-.f64 lambda1 lambda2) (*.f64 #s(literal 2 binary64) (PI.f64)))))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 phi1 (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 phi2 (sin.f64 phi1)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 phi1 (sin.f64 phi2)))) R)
(*.f64 (acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (+.f64 (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (*.f64 lambda1 #s(literal -1/2 binary64))))))) R)
(*.f64 (acos.f64 (/.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (cos.f64 (+.f64 lambda1 lambda2)))) R)
(*.f64 (acos.f64 (/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (cos.f64 (+.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 phi1 (sin.f64 phi2)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 phi2 (sin.f64 phi1)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 phi2 (*.f64 phi2 #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1))) (*.f64 phi1 (sin.f64 phi2))))) R)
(*.f64 (acos.f64 (fma.f64 #s(literal 1 binary64) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) R)
(*.f64 (acos.f64 (fma.f64 (cos.f64 lambda2) #s(literal 1 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 phi1 (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (+.f64 (sin.f64 lambda1) (*.f64 lambda2 (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64)))))))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (+.f64 (sin.f64 lambda2) (*.f64 lambda1 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)))))))) R)
(*.f64 (acos.f64 (+.f64 (/.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (/.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (cos.f64 phi1)) (cos.f64 (+.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1))) (*.f64 phi1 (sin.f64 phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (sin.f64 lambda1)) (+.f64 (*.f64 lambda2 (*.f64 lambda2 #s(literal 1/6 binary64))) #s(literal -1 binary64)))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 phi1 (*.f64 (sin.f64 phi2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal 1/120 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) R)
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1))) R)
(*.f64 (acos.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)))) R)
(*.f64 (fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (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 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 (-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1)))))) R)
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 phi1 (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
(+.f64 (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))) (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)))
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (-.f64 phi2 lambda1) lambda2))) (cos.f64 phi1)) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 (-.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 (-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
(+.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R) (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (-.f64 #s(literal 0 binary64) (+.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 (-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))))))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) (*.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)) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))))) R)
Outputs
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) R)
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
Calls

1 calls:

37.0ms
phi2
Results
AccuracySegmentsBranch
86.5%3phi2
Compiler

Compiled 6 to 5 computations (16.7% saved)

regimes58.0ms (0.2%)

Memory
14.3MiB live, 147.2MiB allocated
Counts
99 → 3
Calls
Call 1
Inputs
(*.f64 lambda1 R)
(*.f64 (-.f64 lambda2 lambda1) R)
(*.f64 (-.f64 phi1 phi2) R)
(-.f64 #s(literal 0 binary64) (*.f64 R lambda2))
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2))) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2)) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)) (+.f64 lambda2 lambda1)) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (*.f64 lambda1 (*.f64 lambda1 lambda1))) (+.f64 (*.f64 lambda2 lambda2) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda2)))) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (*.f64 lambda1 (*.f64 lambda1 lambda1))) (+.f64 (*.f64 lambda2 lambda2) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda1)))) R)
(*.f64 (*.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (+.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (-.f64 phi2 phi1)))) R)
(*.f64 (/.f64 (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))) R)
(*.f64 (*.f64 (/.f64 (+.f64 phi1 phi2) (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))))) (/.f64 (-.f64 phi1 phi2) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2))))) R)
(*.f64 (acos.f64 #s(literal 1 binary64)) R)
(*.f64 (acos.f64 (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2))) R)
(*.f64 (/.f64 (+.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (pow.f64 (neg.f64 lambda1) #s(literal 3 binary64))) (+.f64 (*.f64 lambda2 lambda2) (-.f64 (*.f64 (neg.f64 lambda1) (neg.f64 lambda1)) (*.f64 lambda2 (neg.f64 lambda1))))) R)
(*.f64 (acos.f64 (cos.f64 lambda1)) R)
(*.f64 (acos.f64 (cos.f64 lambda2)) R)
(*.f64 (acos.f64 (cos.f64 phi1)) R)
(*.f64 (acos.f64 (cos.f64 phi2)) R)
(*.f64 (acos.f64 (cos.f64 (-.f64 lambda1 lambda2))) R)
(*.f64 (acos.f64 (cos.f64 (-.f64 phi2 phi1))) R)
(*.f64 (acos.f64 (*.f64 lambda1 (sin.f64 lambda2))) R)
(*.f64 (fabs.f64 (remainder.f64 (-.f64 lambda1 lambda2) (*.f64 #s(literal 2 binary64) (PI.f64)))) R)
(*.f64 (fabs.f64 (remainder.f64 (-.f64 lambda2 lambda1) (*.f64 #s(literal 2 binary64) (PI.f64)))) R)
(*.f64 (fabs.f64 (remainder.f64 (-.f64 phi1 phi2) (*.f64 #s(literal 2 binary64) (PI.f64)))) R)
(*.f64 (acos.f64 (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))) R)
(*.f64 (acos.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1/2 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal 1/24 binary64)))))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))))))) R)
(*.f64 (acos.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1/2 binary64) (*.f64 phi1 (*.f64 phi1 (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64)))))))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 lambda1))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 lambda2))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))) R)
(*.f64 (acos.f64 (+.f64 (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) lambda2))) R)
(*.f64 (acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))) R)
(*.f64 (acos.f64 (+.f64 (cos.f64 phi2) (*.f64 phi1 (sin.f64 phi2)))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))) R)
(*.f64 (acos.f64 (/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi1)) (cos.f64 (-.f64 (-.f64 lambda1 lambda2) phi1))) #s(literal 2 binary64))) R)
(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (+.f64 (-.f64 phi1 lambda2) lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 #s(literal 0 binary64) (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2)))) (*.f64 #s(literal 1 binary64) (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 (cos.f64 (fabs.f64 (remainder.f64 (-.f64 lambda1 lambda2) (*.f64 #s(literal 2 binary64) (PI.f64)))))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 phi1 (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 phi2 (sin.f64 phi1)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 phi1 (sin.f64 phi2)))) R)
(*.f64 (acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (+.f64 (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (*.f64 lambda1 #s(literal -1/2 binary64))))))) R)
(*.f64 (acos.f64 (/.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (cos.f64 (+.f64 lambda1 lambda2)))) R)
(*.f64 (acos.f64 (/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (cos.f64 (+.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 phi1 (sin.f64 phi2)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 phi2 (sin.f64 phi1)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 phi2 (*.f64 phi2 #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1))) (*.f64 phi1 (sin.f64 phi2))))) R)
(*.f64 (acos.f64 (fma.f64 #s(literal 1 binary64) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) R)
(*.f64 (acos.f64 (fma.f64 (cos.f64 lambda2) #s(literal 1 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 phi1 (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (+.f64 (sin.f64 lambda1) (*.f64 lambda2 (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64)))))))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (+.f64 (sin.f64 lambda2) (*.f64 lambda1 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)))))))) R)
(*.f64 (acos.f64 (+.f64 (/.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (/.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (cos.f64 phi1)) (cos.f64 (+.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1))) (*.f64 phi1 (sin.f64 phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (sin.f64 lambda1)) (+.f64 (*.f64 lambda2 (*.f64 lambda2 #s(literal 1/6 binary64))) #s(literal -1 binary64)))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 phi1 (*.f64 (sin.f64 phi2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal 1/120 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) R)
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1))) R)
(*.f64 (acos.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)))) R)
(*.f64 (fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (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 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 (-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1)))))) R)
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 phi1 (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
(+.f64 (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))) (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)))
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (-.f64 phi2 lambda1) lambda2))) (cos.f64 phi1)) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 (-.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 (-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
(+.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R) (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (-.f64 #s(literal 0 binary64) (+.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 (-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))))))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (fma.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)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (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)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
Calls

1 calls:

30.0ms
phi2
Results
AccuracySegmentsBranch
86.5%3phi2
Compiler

Compiled 6 to 5 computations (16.7% saved)

regimes48.0ms (0.2%)

Memory
-2.1MiB live, 108.2MiB allocated
Counts
97 → 3
Calls
Call 1
Inputs
(*.f64 lambda1 R)
(*.f64 (-.f64 lambda2 lambda1) R)
(*.f64 (-.f64 phi1 phi2) R)
(-.f64 #s(literal 0 binary64) (*.f64 R lambda2))
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2))) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2)) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)) (+.f64 lambda2 lambda1)) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (*.f64 lambda1 (*.f64 lambda1 lambda1))) (+.f64 (*.f64 lambda2 lambda2) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda2)))) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (*.f64 lambda1 (*.f64 lambda1 lambda1))) (+.f64 (*.f64 lambda2 lambda2) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda1)))) R)
(*.f64 (*.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (+.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (-.f64 phi2 phi1)))) R)
(*.f64 (/.f64 (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))) R)
(*.f64 (*.f64 (/.f64 (+.f64 phi1 phi2) (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))))) (/.f64 (-.f64 phi1 phi2) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2))))) R)
(*.f64 (acos.f64 #s(literal 1 binary64)) R)
(*.f64 (acos.f64 (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2))) R)
(*.f64 (/.f64 (+.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (pow.f64 (neg.f64 lambda1) #s(literal 3 binary64))) (+.f64 (*.f64 lambda2 lambda2) (-.f64 (*.f64 (neg.f64 lambda1) (neg.f64 lambda1)) (*.f64 lambda2 (neg.f64 lambda1))))) R)
(*.f64 (acos.f64 (cos.f64 lambda1)) R)
(*.f64 (acos.f64 (cos.f64 lambda2)) R)
(*.f64 (acos.f64 (cos.f64 phi1)) R)
(*.f64 (acos.f64 (cos.f64 phi2)) R)
(*.f64 (acos.f64 (cos.f64 (-.f64 lambda1 lambda2))) R)
(*.f64 (acos.f64 (cos.f64 (-.f64 phi2 phi1))) R)
(*.f64 (acos.f64 (*.f64 lambda1 (sin.f64 lambda2))) R)
(*.f64 (fabs.f64 (remainder.f64 (-.f64 lambda1 lambda2) (*.f64 #s(literal 2 binary64) (PI.f64)))) R)
(*.f64 (fabs.f64 (remainder.f64 (-.f64 lambda2 lambda1) (*.f64 #s(literal 2 binary64) (PI.f64)))) R)
(*.f64 (fabs.f64 (remainder.f64 (-.f64 phi1 phi2) (*.f64 #s(literal 2 binary64) (PI.f64)))) R)
(*.f64 (acos.f64 (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))) R)
(*.f64 (acos.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1/2 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal 1/24 binary64)))))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))))))) R)
(*.f64 (acos.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1/2 binary64) (*.f64 phi1 (*.f64 phi1 (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64)))))))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 lambda1))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 lambda2))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))) R)
(*.f64 (acos.f64 (+.f64 (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) lambda2))) R)
(*.f64 (acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))) R)
(*.f64 (acos.f64 (+.f64 (cos.f64 phi2) (*.f64 phi1 (sin.f64 phi2)))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))) R)
(*.f64 (acos.f64 (/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi1)) (cos.f64 (-.f64 (-.f64 lambda1 lambda2) phi1))) #s(literal 2 binary64))) R)
(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (+.f64 (-.f64 phi1 lambda2) lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 #s(literal 0 binary64) (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2)))) (*.f64 #s(literal 1 binary64) (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 (cos.f64 (fabs.f64 (remainder.f64 (-.f64 lambda1 lambda2) (*.f64 #s(literal 2 binary64) (PI.f64)))))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 phi1 (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 phi2 (sin.f64 phi1)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 phi1 (sin.f64 phi2)))) R)
(*.f64 (acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (+.f64 (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (*.f64 lambda1 #s(literal -1/2 binary64))))))) R)
(*.f64 (acos.f64 (/.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (cos.f64 (+.f64 lambda1 lambda2)))) R)
(*.f64 (acos.f64 (/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (cos.f64 (+.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 phi1 (sin.f64 phi2)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 phi2 (sin.f64 phi1)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 phi2 (*.f64 phi2 #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1))) (*.f64 phi1 (sin.f64 phi2))))) R)
(*.f64 (acos.f64 (fma.f64 #s(literal 1 binary64) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) R)
(*.f64 (acos.f64 (fma.f64 (cos.f64 lambda2) #s(literal 1 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 phi1 (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (+.f64 (sin.f64 lambda1) (*.f64 lambda2 (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64)))))))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (+.f64 (sin.f64 lambda2) (*.f64 lambda1 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)))))))) R)
(*.f64 (acos.f64 (+.f64 (/.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (/.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (cos.f64 phi1)) (cos.f64 (+.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1))) (*.f64 phi1 (sin.f64 phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (sin.f64 lambda1)) (+.f64 (*.f64 lambda2 (*.f64 lambda2 #s(literal 1/6 binary64))) #s(literal -1 binary64)))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 phi1 (*.f64 (sin.f64 phi2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal 1/120 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) R)
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1))) R)
(*.f64 (acos.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)))) R)
(*.f64 (fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (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 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 (-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1)))))) R)
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 phi1 (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
(+.f64 (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))) (neg.f64 (*.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)))
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (-.f64 phi2 lambda1) lambda2))) (cos.f64 phi1)) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 (-.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 (-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
(+.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R) (*.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (-.f64 #s(literal 0 binary64) (+.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 (-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))))))) R)
Outputs
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
Calls

1 calls:

31.0ms
phi2
Results
AccuracySegmentsBranch
86.5%3phi2
Compiler

Compiled 6 to 5 computations (16.7% saved)

regimes211.0ms (0.9%)

Memory
28.8MiB live, 455.5MiB allocated
Counts
82 → 3
Calls
Call 1
Inputs
(*.f64 lambda1 R)
(*.f64 (-.f64 lambda2 lambda1) R)
(*.f64 (-.f64 phi1 phi2) R)
(-.f64 #s(literal 0 binary64) (*.f64 R lambda2))
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2))) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2)) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)) (+.f64 lambda2 lambda1)) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (*.f64 lambda1 (*.f64 lambda1 lambda1))) (+.f64 (*.f64 lambda2 lambda2) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda2)))) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (*.f64 lambda1 (*.f64 lambda1 lambda1))) (+.f64 (*.f64 lambda2 lambda2) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda1)))) R)
(*.f64 (*.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (+.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (-.f64 phi2 phi1)))) R)
(*.f64 (/.f64 (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))) R)
(*.f64 (*.f64 (/.f64 (+.f64 phi1 phi2) (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))))) (/.f64 (-.f64 phi1 phi2) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2))))) R)
(*.f64 (acos.f64 #s(literal 1 binary64)) R)
(*.f64 (acos.f64 (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2))) R)
(*.f64 (/.f64 (+.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (pow.f64 (neg.f64 lambda1) #s(literal 3 binary64))) (+.f64 (*.f64 lambda2 lambda2) (-.f64 (*.f64 (neg.f64 lambda1) (neg.f64 lambda1)) (*.f64 lambda2 (neg.f64 lambda1))))) R)
(*.f64 (acos.f64 (cos.f64 lambda1)) R)
(*.f64 (acos.f64 (cos.f64 lambda2)) R)
(*.f64 (acos.f64 (cos.f64 phi1)) R)
(*.f64 (acos.f64 (cos.f64 phi2)) R)
(*.f64 (acos.f64 (cos.f64 (-.f64 lambda1 lambda2))) R)
(*.f64 (acos.f64 (cos.f64 (-.f64 phi2 phi1))) R)
(*.f64 (acos.f64 (*.f64 lambda1 (sin.f64 lambda2))) R)
(*.f64 (fabs.f64 (remainder.f64 (-.f64 lambda1 lambda2) (*.f64 #s(literal 2 binary64) (PI.f64)))) R)
(*.f64 (fabs.f64 (remainder.f64 (-.f64 lambda2 lambda1) (*.f64 #s(literal 2 binary64) (PI.f64)))) R)
(*.f64 (fabs.f64 (remainder.f64 (-.f64 phi1 phi2) (*.f64 #s(literal 2 binary64) (PI.f64)))) R)
(*.f64 (acos.f64 (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))) R)
(*.f64 (acos.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1/2 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal 1/24 binary64)))))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))))))) R)
(*.f64 (acos.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1/2 binary64) (*.f64 phi1 (*.f64 phi1 (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64)))))))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 lambda1))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 lambda2))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))) R)
(*.f64 (acos.f64 (+.f64 (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) lambda2))) R)
(*.f64 (acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))) R)
(*.f64 (acos.f64 (+.f64 (cos.f64 phi2) (*.f64 phi1 (sin.f64 phi2)))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))) R)
(*.f64 (acos.f64 (/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi1)) (cos.f64 (-.f64 (-.f64 lambda1 lambda2) phi1))) #s(literal 2 binary64))) R)
(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (+.f64 (-.f64 phi1 lambda2) lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 #s(literal 0 binary64) (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2)))) (*.f64 #s(literal 1 binary64) (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 (cos.f64 (fabs.f64 (remainder.f64 (-.f64 lambda1 lambda2) (*.f64 #s(literal 2 binary64) (PI.f64)))))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 phi1 (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 phi2 (sin.f64 phi1)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 phi1 (sin.f64 phi2)))) R)
(*.f64 (acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (+.f64 (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (*.f64 lambda1 #s(literal -1/2 binary64))))))) R)
(*.f64 (acos.f64 (/.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (cos.f64 (+.f64 lambda1 lambda2)))) R)
(*.f64 (acos.f64 (/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (cos.f64 (+.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 phi1 (sin.f64 phi2)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 phi2 (sin.f64 phi1)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 phi2 (*.f64 phi2 #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1))) (*.f64 phi1 (sin.f64 phi2))))) R)
(*.f64 (acos.f64 (fma.f64 #s(literal 1 binary64) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) R)
(*.f64 (acos.f64 (fma.f64 (cos.f64 lambda2) #s(literal 1 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 phi1 (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (+.f64 (sin.f64 lambda1) (*.f64 lambda2 (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64)))))))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (+.f64 (sin.f64 lambda2) (*.f64 lambda1 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)))))))) R)
(*.f64 (acos.f64 (+.f64 (/.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (/.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (cos.f64 phi1)) (cos.f64 (+.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1))) (*.f64 phi1 (sin.f64 phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (sin.f64 lambda1)) (+.f64 (*.f64 lambda2 (*.f64 lambda2 #s(literal 1/6 binary64))) #s(literal -1 binary64)))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 phi1 (*.f64 (sin.f64 phi2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal 1/120 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) R)
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1))) R)
(*.f64 (acos.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)))) R)
(*.f64 (fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) R)
Outputs
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))) R)
(*.f64 (acos.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))) R)
Calls

7 calls:

33.0ms
phi2
32.0ms
lambda2
29.0ms
R
27.0ms
(-.f64 lambda1 lambda2)
26.0ms
(cos.f64 (-.f64 lambda1 lambda2))
Results
AccuracySegmentsBranch
60.9%2R
68.3%2(cos.f64 (-.f64 lambda1 lambda2))
67.4%2(-.f64 lambda1 lambda2)
79.0%3lambda1
80.4%4lambda2
77.9%3phi1
77.9%3phi2
Compiler

Compiled 47 to 38 computations (19.1% saved)

regimes106.0ms (0.4%)

Memory
-39.6MiB live, 190.0MiB allocated
Counts
80 → 3
Calls
Call 1
Inputs
(*.f64 lambda1 R)
(*.f64 (-.f64 lambda2 lambda1) R)
(*.f64 (-.f64 phi1 phi2) R)
(-.f64 #s(literal 0 binary64) (*.f64 R lambda2))
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2))) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2)) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)) (+.f64 lambda2 lambda1)) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (*.f64 lambda1 (*.f64 lambda1 lambda1))) (+.f64 (*.f64 lambda2 lambda2) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda2)))) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (*.f64 lambda1 (*.f64 lambda1 lambda1))) (+.f64 (*.f64 lambda2 lambda2) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda1)))) R)
(*.f64 (*.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (+.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (-.f64 phi2 phi1)))) R)
(*.f64 (/.f64 (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))) R)
(*.f64 (*.f64 (/.f64 (+.f64 phi1 phi2) (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))))) (/.f64 (-.f64 phi1 phi2) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2))))) R)
(*.f64 (acos.f64 #s(literal 1 binary64)) R)
(*.f64 (acos.f64 (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2))) R)
(*.f64 (/.f64 (+.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (pow.f64 (neg.f64 lambda1) #s(literal 3 binary64))) (+.f64 (*.f64 lambda2 lambda2) (-.f64 (*.f64 (neg.f64 lambda1) (neg.f64 lambda1)) (*.f64 lambda2 (neg.f64 lambda1))))) R)
(*.f64 (acos.f64 (cos.f64 lambda1)) R)
(*.f64 (acos.f64 (cos.f64 lambda2)) R)
(*.f64 (acos.f64 (cos.f64 phi1)) R)
(*.f64 (acos.f64 (cos.f64 phi2)) R)
(*.f64 (acos.f64 (cos.f64 (-.f64 lambda1 lambda2))) R)
(*.f64 (acos.f64 (cos.f64 (-.f64 phi2 phi1))) R)
(*.f64 (acos.f64 (*.f64 lambda1 (sin.f64 lambda2))) R)
(*.f64 (fabs.f64 (remainder.f64 (-.f64 lambda1 lambda2) (*.f64 #s(literal 2 binary64) (PI.f64)))) R)
(*.f64 (fabs.f64 (remainder.f64 (-.f64 lambda2 lambda1) (*.f64 #s(literal 2 binary64) (PI.f64)))) R)
(*.f64 (fabs.f64 (remainder.f64 (-.f64 phi1 phi2) (*.f64 #s(literal 2 binary64) (PI.f64)))) R)
(*.f64 (acos.f64 (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))) R)
(*.f64 (acos.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1/2 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal 1/24 binary64)))))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))))))) R)
(*.f64 (acos.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1/2 binary64) (*.f64 phi1 (*.f64 phi1 (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64)))))))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 lambda1))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 lambda2))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))) R)
(*.f64 (acos.f64 (+.f64 (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) lambda2))) R)
(*.f64 (acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))) R)
(*.f64 (acos.f64 (+.f64 (cos.f64 phi2) (*.f64 phi1 (sin.f64 phi2)))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))) R)
(*.f64 (acos.f64 (/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi1)) (cos.f64 (-.f64 (-.f64 lambda1 lambda2) phi1))) #s(literal 2 binary64))) R)
(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (+.f64 (-.f64 phi1 lambda2) lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 #s(literal 0 binary64) (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2)))) (*.f64 #s(literal 1 binary64) (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 (cos.f64 (fabs.f64 (remainder.f64 (-.f64 lambda1 lambda2) (*.f64 #s(literal 2 binary64) (PI.f64)))))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 phi1 (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 phi2 (sin.f64 phi1)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 phi1 (sin.f64 phi2)))) R)
(*.f64 (acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (+.f64 (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (*.f64 lambda1 #s(literal -1/2 binary64))))))) R)
(*.f64 (acos.f64 (/.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (cos.f64 (+.f64 lambda1 lambda2)))) R)
(*.f64 (acos.f64 (/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (cos.f64 (+.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 phi1 (sin.f64 phi2)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 phi2 (sin.f64 phi1)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 phi2 (*.f64 phi2 #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1))) (*.f64 phi1 (sin.f64 phi2))))) R)
(*.f64 (acos.f64 (fma.f64 #s(literal 1 binary64) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) R)
(*.f64 (acos.f64 (fma.f64 (cos.f64 lambda2) #s(literal 1 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 phi1 (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (+.f64 (sin.f64 lambda1) (*.f64 lambda2 (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64)))))))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (+.f64 (sin.f64 lambda2) (*.f64 lambda1 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)))))))) R)
(*.f64 (acos.f64 (+.f64 (/.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (/.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (cos.f64 phi1)) (cos.f64 (+.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1))) (*.f64 phi1 (sin.f64 phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (sin.f64 lambda1)) (+.f64 (*.f64 lambda2 (*.f64 lambda2 #s(literal 1/6 binary64))) #s(literal -1 binary64)))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 phi1 (*.f64 (sin.f64 phi2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal 1/120 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) R)
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1))) R)
(*.f64 (acos.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))) R)
Outputs
(*.f64 (acos.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1))) R)
(*.f64 (acos.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))) R)
Calls

3 calls:

41.0ms
lambda1
25.0ms
phi1
25.0ms
lambda2
Results
AccuracySegmentsBranch
77.9%3phi1
60.2%3lambda2
78.4%4lambda1
Compiler

Compiled 18 to 15 computations (16.7% saved)

regimes158.0ms (0.6%)

Memory
1.1MiB live, 120.9MiB allocated
Counts
79 → 2
Calls
Call 1
Inputs
(*.f64 lambda1 R)
(*.f64 (-.f64 lambda2 lambda1) R)
(*.f64 (-.f64 phi1 phi2) R)
(-.f64 #s(literal 0 binary64) (*.f64 R lambda2))
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2))) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2)) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)) (+.f64 lambda2 lambda1)) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (*.f64 lambda1 (*.f64 lambda1 lambda1))) (+.f64 (*.f64 lambda2 lambda2) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda2)))) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (*.f64 lambda1 (*.f64 lambda1 lambda1))) (+.f64 (*.f64 lambda2 lambda2) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda1)))) R)
(*.f64 (*.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (+.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (-.f64 phi2 phi1)))) R)
(*.f64 (/.f64 (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))) R)
(*.f64 (*.f64 (/.f64 (+.f64 phi1 phi2) (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))))) (/.f64 (-.f64 phi1 phi2) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2))))) R)
(*.f64 (acos.f64 #s(literal 1 binary64)) R)
(*.f64 (acos.f64 (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2))) R)
(*.f64 (/.f64 (+.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (pow.f64 (neg.f64 lambda1) #s(literal 3 binary64))) (+.f64 (*.f64 lambda2 lambda2) (-.f64 (*.f64 (neg.f64 lambda1) (neg.f64 lambda1)) (*.f64 lambda2 (neg.f64 lambda1))))) R)
(*.f64 (acos.f64 (cos.f64 lambda1)) R)
(*.f64 (acos.f64 (cos.f64 lambda2)) R)
(*.f64 (acos.f64 (cos.f64 phi1)) R)
(*.f64 (acos.f64 (cos.f64 phi2)) R)
(*.f64 (acos.f64 (cos.f64 (-.f64 lambda1 lambda2))) R)
(*.f64 (acos.f64 (cos.f64 (-.f64 phi2 phi1))) R)
(*.f64 (acos.f64 (*.f64 lambda1 (sin.f64 lambda2))) R)
(*.f64 (fabs.f64 (remainder.f64 (-.f64 lambda1 lambda2) (*.f64 #s(literal 2 binary64) (PI.f64)))) R)
(*.f64 (fabs.f64 (remainder.f64 (-.f64 lambda2 lambda1) (*.f64 #s(literal 2 binary64) (PI.f64)))) R)
(*.f64 (fabs.f64 (remainder.f64 (-.f64 phi1 phi2) (*.f64 #s(literal 2 binary64) (PI.f64)))) R)
(*.f64 (acos.f64 (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))) R)
(*.f64 (acos.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1/2 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal 1/24 binary64)))))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))))))) R)
(*.f64 (acos.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1/2 binary64) (*.f64 phi1 (*.f64 phi1 (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64)))))))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 lambda1))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 lambda2))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))) R)
(*.f64 (acos.f64 (+.f64 (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) lambda2))) R)
(*.f64 (acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))) R)
(*.f64 (acos.f64 (+.f64 (cos.f64 phi2) (*.f64 phi1 (sin.f64 phi2)))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))) R)
(*.f64 (acos.f64 (/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi1)) (cos.f64 (-.f64 (-.f64 lambda1 lambda2) phi1))) #s(literal 2 binary64))) R)
(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (+.f64 (-.f64 phi1 lambda2) lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 #s(literal 0 binary64) (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2)))) (*.f64 #s(literal 1 binary64) (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 (cos.f64 (fabs.f64 (remainder.f64 (-.f64 lambda1 lambda2) (*.f64 #s(literal 2 binary64) (PI.f64)))))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 phi1 (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 phi2 (sin.f64 phi1)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 phi1 (sin.f64 phi2)))) R)
(*.f64 (acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (+.f64 (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (*.f64 lambda1 #s(literal -1/2 binary64))))))) R)
(*.f64 (acos.f64 (/.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (cos.f64 (+.f64 lambda1 lambda2)))) R)
(*.f64 (acos.f64 (/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (cos.f64 (+.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 phi1 (sin.f64 phi2)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 phi2 (sin.f64 phi1)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 phi2 (*.f64 phi2 #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1))) (*.f64 phi1 (sin.f64 phi2))))) R)
(*.f64 (acos.f64 (fma.f64 #s(literal 1 binary64) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) R)
(*.f64 (acos.f64 (fma.f64 (cos.f64 lambda2) #s(literal 1 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 phi1 (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (+.f64 (sin.f64 lambda1) (*.f64 lambda2 (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64)))))))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (+.f64 (sin.f64 lambda2) (*.f64 lambda1 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)))))))) R)
(*.f64 (acos.f64 (+.f64 (/.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (/.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (cos.f64 phi1)) (cos.f64 (+.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1))) (*.f64 phi1 (sin.f64 phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (sin.f64 lambda1)) (+.f64 (*.f64 lambda2 (*.f64 lambda2 #s(literal 1/6 binary64))) #s(literal -1 binary64)))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 phi1 (*.f64 (sin.f64 phi2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal 1/120 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) R)
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1))) R)
(*.f64 (acos.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))) R)
Outputs
(*.f64 (acos.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1))) R)
(*.f64 (acos.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))) R)
Calls

2 calls:

121.0ms
phi2
24.0ms
phi1
Results
AccuracySegmentsBranch
75.6%2phi2
75.7%2phi1
Compiler

Compiled 12 to 10 computations (16.7% saved)

regimes88.0ms (0.4%)

Memory
5.7MiB live, 164.0MiB allocated
Counts
78 → 2
Calls
Call 1
Inputs
(*.f64 lambda1 R)
(*.f64 (-.f64 lambda2 lambda1) R)
(*.f64 (-.f64 phi1 phi2) R)
(-.f64 #s(literal 0 binary64) (*.f64 R lambda2))
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2))) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2)) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)) (+.f64 lambda2 lambda1)) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (*.f64 lambda1 (*.f64 lambda1 lambda1))) (+.f64 (*.f64 lambda2 lambda2) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda2)))) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (*.f64 lambda1 (*.f64 lambda1 lambda1))) (+.f64 (*.f64 lambda2 lambda2) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda1)))) R)
(*.f64 (*.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (+.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (-.f64 phi2 phi1)))) R)
(*.f64 (/.f64 (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))) R)
(*.f64 (*.f64 (/.f64 (+.f64 phi1 phi2) (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))))) (/.f64 (-.f64 phi1 phi2) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2))))) R)
(*.f64 (acos.f64 #s(literal 1 binary64)) R)
(*.f64 (acos.f64 (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2))) R)
(*.f64 (/.f64 (+.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (pow.f64 (neg.f64 lambda1) #s(literal 3 binary64))) (+.f64 (*.f64 lambda2 lambda2) (-.f64 (*.f64 (neg.f64 lambda1) (neg.f64 lambda1)) (*.f64 lambda2 (neg.f64 lambda1))))) R)
(*.f64 (acos.f64 (cos.f64 lambda1)) R)
(*.f64 (acos.f64 (cos.f64 lambda2)) R)
(*.f64 (acos.f64 (cos.f64 phi1)) R)
(*.f64 (acos.f64 (cos.f64 phi2)) R)
(*.f64 (acos.f64 (cos.f64 (-.f64 lambda1 lambda2))) R)
(*.f64 (acos.f64 (cos.f64 (-.f64 phi2 phi1))) R)
(*.f64 (acos.f64 (*.f64 lambda1 (sin.f64 lambda2))) R)
(*.f64 (fabs.f64 (remainder.f64 (-.f64 lambda1 lambda2) (*.f64 #s(literal 2 binary64) (PI.f64)))) R)
(*.f64 (fabs.f64 (remainder.f64 (-.f64 lambda2 lambda1) (*.f64 #s(literal 2 binary64) (PI.f64)))) R)
(*.f64 (fabs.f64 (remainder.f64 (-.f64 phi1 phi2) (*.f64 #s(literal 2 binary64) (PI.f64)))) R)
(*.f64 (acos.f64 (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))) R)
(*.f64 (acos.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1/2 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal 1/24 binary64)))))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))))))) R)
(*.f64 (acos.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1/2 binary64) (*.f64 phi1 (*.f64 phi1 (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64)))))))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 lambda1))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 lambda2))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))) R)
(*.f64 (acos.f64 (+.f64 (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) lambda2))) R)
(*.f64 (acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))) R)
(*.f64 (acos.f64 (+.f64 (cos.f64 phi2) (*.f64 phi1 (sin.f64 phi2)))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))) R)
(*.f64 (acos.f64 (/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi1)) (cos.f64 (-.f64 (-.f64 lambda1 lambda2) phi1))) #s(literal 2 binary64))) R)
(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (+.f64 (-.f64 phi1 lambda2) lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 #s(literal 0 binary64) (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2)))) (*.f64 #s(literal 1 binary64) (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 (cos.f64 (fabs.f64 (remainder.f64 (-.f64 lambda1 lambda2) (*.f64 #s(literal 2 binary64) (PI.f64)))))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 phi1 (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 phi2 (sin.f64 phi1)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 phi1 (sin.f64 phi2)))) R)
(*.f64 (acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (+.f64 (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (*.f64 lambda1 #s(literal -1/2 binary64))))))) R)
(*.f64 (acos.f64 (/.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (cos.f64 (+.f64 lambda1 lambda2)))) R)
(*.f64 (acos.f64 (/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (cos.f64 (+.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 phi1 (sin.f64 phi2)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 phi2 (sin.f64 phi1)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 phi2 (*.f64 phi2 #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1))) (*.f64 phi1 (sin.f64 phi2))))) R)
(*.f64 (acos.f64 (fma.f64 #s(literal 1 binary64) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) R)
(*.f64 (acos.f64 (fma.f64 (cos.f64 lambda2) #s(literal 1 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 phi1 (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (+.f64 (sin.f64 lambda1) (*.f64 lambda2 (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64)))))))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (+.f64 (sin.f64 lambda2) (*.f64 lambda1 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)))))))) R)
(*.f64 (acos.f64 (+.f64 (/.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (/.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (cos.f64 phi1)) (cos.f64 (+.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1))) (*.f64 phi1 (sin.f64 phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (sin.f64 lambda1)) (+.f64 (*.f64 lambda2 (*.f64 lambda2 #s(literal 1/6 binary64))) #s(literal -1 binary64)))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 phi1 (*.f64 (sin.f64 phi2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal 1/120 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) R)
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1))) R)
Outputs
(*.f64 (acos.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) R)
Calls

3 calls:

27.0ms
lambda1
25.0ms
phi2
24.0ms
phi1
Results
AccuracySegmentsBranch
62.6%4lambda1
70.6%2phi2
65.6%2phi1
Compiler

Compiled 18 to 15 computations (16.7% saved)

regimes146.0ms (0.6%)

Memory
-17.9MiB live, 180.8MiB allocated
Counts
77 → 3
Calls
Call 1
Inputs
(*.f64 lambda1 R)
(*.f64 (-.f64 lambda2 lambda1) R)
(*.f64 (-.f64 phi1 phi2) R)
(-.f64 #s(literal 0 binary64) (*.f64 R lambda2))
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2))) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2)) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)) (+.f64 lambda2 lambda1)) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (*.f64 lambda1 (*.f64 lambda1 lambda1))) (+.f64 (*.f64 lambda2 lambda2) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda2)))) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (*.f64 lambda1 (*.f64 lambda1 lambda1))) (+.f64 (*.f64 lambda2 lambda2) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda1)))) R)
(*.f64 (*.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (+.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (-.f64 phi2 phi1)))) R)
(*.f64 (/.f64 (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))) R)
(*.f64 (*.f64 (/.f64 (+.f64 phi1 phi2) (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))))) (/.f64 (-.f64 phi1 phi2) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2))))) R)
(*.f64 (acos.f64 #s(literal 1 binary64)) R)
(*.f64 (acos.f64 (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2))) R)
(*.f64 (/.f64 (+.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (pow.f64 (neg.f64 lambda1) #s(literal 3 binary64))) (+.f64 (*.f64 lambda2 lambda2) (-.f64 (*.f64 (neg.f64 lambda1) (neg.f64 lambda1)) (*.f64 lambda2 (neg.f64 lambda1))))) R)
(*.f64 (acos.f64 (cos.f64 lambda1)) R)
(*.f64 (acos.f64 (cos.f64 lambda2)) R)
(*.f64 (acos.f64 (cos.f64 phi1)) R)
(*.f64 (acos.f64 (cos.f64 phi2)) R)
(*.f64 (acos.f64 (cos.f64 (-.f64 lambda1 lambda2))) R)
(*.f64 (acos.f64 (cos.f64 (-.f64 phi2 phi1))) R)
(*.f64 (acos.f64 (*.f64 lambda1 (sin.f64 lambda2))) R)
(*.f64 (fabs.f64 (remainder.f64 (-.f64 lambda1 lambda2) (*.f64 #s(literal 2 binary64) (PI.f64)))) R)
(*.f64 (fabs.f64 (remainder.f64 (-.f64 lambda2 lambda1) (*.f64 #s(literal 2 binary64) (PI.f64)))) R)
(*.f64 (fabs.f64 (remainder.f64 (-.f64 phi1 phi2) (*.f64 #s(literal 2 binary64) (PI.f64)))) R)
(*.f64 (acos.f64 (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))) R)
(*.f64 (acos.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1/2 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal 1/24 binary64)))))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))))))) R)
(*.f64 (acos.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1/2 binary64) (*.f64 phi1 (*.f64 phi1 (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64)))))))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 lambda1))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 lambda2))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))) R)
(*.f64 (acos.f64 (+.f64 (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) lambda2))) R)
(*.f64 (acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))) R)
(*.f64 (acos.f64 (+.f64 (cos.f64 phi2) (*.f64 phi1 (sin.f64 phi2)))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))) R)
(*.f64 (acos.f64 (/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi1)) (cos.f64 (-.f64 (-.f64 lambda1 lambda2) phi1))) #s(literal 2 binary64))) R)
(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (+.f64 (-.f64 phi1 lambda2) lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 #s(literal 0 binary64) (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2)))) (*.f64 #s(literal 1 binary64) (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 (cos.f64 (fabs.f64 (remainder.f64 (-.f64 lambda1 lambda2) (*.f64 #s(literal 2 binary64) (PI.f64)))))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 phi1 (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 phi2 (sin.f64 phi1)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 phi1 (sin.f64 phi2)))) R)
(*.f64 (acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (+.f64 (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (*.f64 lambda1 #s(literal -1/2 binary64))))))) R)
(*.f64 (acos.f64 (/.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (cos.f64 (+.f64 lambda1 lambda2)))) R)
(*.f64 (acos.f64 (/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (cos.f64 (+.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 phi1 (sin.f64 phi2)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 phi2 (sin.f64 phi1)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 phi2 (*.f64 phi2 #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1))) (*.f64 phi1 (sin.f64 phi2))))) R)
(*.f64 (acos.f64 (fma.f64 #s(literal 1 binary64) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) R)
(*.f64 (acos.f64 (fma.f64 (cos.f64 lambda2) #s(literal 1 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 phi1 (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (+.f64 (sin.f64 lambda1) (*.f64 lambda2 (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64)))))))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (+.f64 (sin.f64 lambda2) (*.f64 lambda1 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)))))))) R)
(*.f64 (acos.f64 (+.f64 (/.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (/.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (cos.f64 phi1)) (cos.f64 (+.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1))) (*.f64 phi1 (sin.f64 phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (sin.f64 lambda1)) (+.f64 (*.f64 lambda2 (*.f64 lambda2 #s(literal 1/6 binary64))) #s(literal -1 binary64)))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 phi1 (*.f64 (sin.f64 phi2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal 1/120 binary64))))))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) R)
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) R)
Outputs
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 phi2 (sin.f64 phi1)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 phi2 (*.f64 phi2 #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) R)
Calls

5 calls:

42.0ms
phi1
27.0ms
phi2
23.0ms
R
23.0ms
(cos.f64 (-.f64 lambda1 lambda2))
21.0ms
(-.f64 lambda1 lambda2)
Results
AccuracySegmentsBranch
47.1%2R
60.2%2phi1
55.4%2(-.f64 lambda1 lambda2)
58.3%3(cos.f64 (-.f64 lambda1 lambda2))
61.8%3phi2
Compiler

Compiled 35 to 28 computations (20% saved)

regimes44.0ms (0.2%)

Memory
-9.1MiB live, 75.1MiB allocated
Counts
63 → 2
Calls
Call 1
Inputs
(*.f64 lambda1 R)
(*.f64 (-.f64 lambda2 lambda1) R)
(*.f64 (-.f64 phi1 phi2) R)
(-.f64 #s(literal 0 binary64) (*.f64 R lambda2))
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2))) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2)) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)) (+.f64 lambda2 lambda1)) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (*.f64 lambda1 (*.f64 lambda1 lambda1))) (+.f64 (*.f64 lambda2 lambda2) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda2)))) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (*.f64 lambda1 (*.f64 lambda1 lambda1))) (+.f64 (*.f64 lambda2 lambda2) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda1)))) R)
(*.f64 (*.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (+.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (-.f64 phi2 phi1)))) R)
(*.f64 (/.f64 (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))) R)
(*.f64 (*.f64 (/.f64 (+.f64 phi1 phi2) (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))))) (/.f64 (-.f64 phi1 phi2) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2))))) R)
(*.f64 (acos.f64 #s(literal 1 binary64)) R)
(*.f64 (acos.f64 (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2))) R)
(*.f64 (/.f64 (+.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (pow.f64 (neg.f64 lambda1) #s(literal 3 binary64))) (+.f64 (*.f64 lambda2 lambda2) (-.f64 (*.f64 (neg.f64 lambda1) (neg.f64 lambda1)) (*.f64 lambda2 (neg.f64 lambda1))))) R)
(*.f64 (acos.f64 (cos.f64 lambda1)) R)
(*.f64 (acos.f64 (cos.f64 lambda2)) R)
(*.f64 (acos.f64 (cos.f64 phi1)) R)
(*.f64 (acos.f64 (cos.f64 phi2)) R)
(*.f64 (acos.f64 (cos.f64 (-.f64 lambda1 lambda2))) R)
(*.f64 (acos.f64 (cos.f64 (-.f64 phi2 phi1))) R)
(*.f64 (acos.f64 (*.f64 lambda1 (sin.f64 lambda2))) R)
(*.f64 (fabs.f64 (remainder.f64 (-.f64 lambda1 lambda2) (*.f64 #s(literal 2 binary64) (PI.f64)))) R)
(*.f64 (fabs.f64 (remainder.f64 (-.f64 lambda2 lambda1) (*.f64 #s(literal 2 binary64) (PI.f64)))) R)
(*.f64 (fabs.f64 (remainder.f64 (-.f64 phi1 phi2) (*.f64 #s(literal 2 binary64) (PI.f64)))) R)
(*.f64 (acos.f64 (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))) R)
(*.f64 (acos.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1/2 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal 1/24 binary64)))))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))))))) R)
(*.f64 (acos.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1/2 binary64) (*.f64 phi1 (*.f64 phi1 (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64)))))))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 lambda1))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 lambda2))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))) R)
(*.f64 (acos.f64 (+.f64 (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) lambda2))) R)
(*.f64 (acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))) R)
(*.f64 (acos.f64 (+.f64 (cos.f64 phi2) (*.f64 phi1 (sin.f64 phi2)))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))) R)
(*.f64 (acos.f64 (/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi1)) (cos.f64 (-.f64 (-.f64 lambda1 lambda2) phi1))) #s(literal 2 binary64))) R)
(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (+.f64 (-.f64 phi1 lambda2) lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 #s(literal 0 binary64) (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2)))) (*.f64 #s(literal 1 binary64) (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 (cos.f64 (fabs.f64 (remainder.f64 (-.f64 lambda1 lambda2) (*.f64 #s(literal 2 binary64) (PI.f64)))))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 phi1 (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 phi2 (sin.f64 phi1)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 phi1 (sin.f64 phi2)))) R)
(*.f64 (acos.f64 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (+.f64 (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (*.f64 lambda1 #s(literal -1/2 binary64))))))) R)
(*.f64 (acos.f64 (/.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (cos.f64 (+.f64 lambda1 lambda2)))) R)
(*.f64 (acos.f64 (/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (cos.f64 (+.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 phi1 (sin.f64 phi2)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 phi2 (sin.f64 phi1)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 phi2 (*.f64 phi2 #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1))) (*.f64 phi1 (sin.f64 phi2))))) R)
(*.f64 (acos.f64 (fma.f64 #s(literal 1 binary64) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) R)
(*.f64 (acos.f64 (fma.f64 (cos.f64 lambda2) #s(literal 1 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) R)
Outputs
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) R)
Calls

2 calls:

20.0ms
phi2
18.0ms
phi1
Results
AccuracySegmentsBranch
60.2%2phi1
60.1%2phi2
Compiler

Compiled 12 to 10 computations (16.7% saved)

regimes71.0ms (0.3%)

Memory
3.8MiB live, 122.8MiB allocated
Counts
35 → 2
Calls
Call 1
Inputs
(*.f64 lambda1 R)
(*.f64 (-.f64 lambda2 lambda1) R)
(*.f64 (-.f64 phi1 phi2) R)
(-.f64 #s(literal 0 binary64) (*.f64 R lambda2))
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2))) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2)) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)) (+.f64 lambda2 lambda1)) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (*.f64 lambda1 (*.f64 lambda1 lambda1))) (+.f64 (*.f64 lambda2 lambda2) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda2)))) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (*.f64 lambda1 (*.f64 lambda1 lambda1))) (+.f64 (*.f64 lambda2 lambda2) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda1)))) R)
(*.f64 (*.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (+.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (-.f64 phi2 phi1)))) R)
(*.f64 (/.f64 (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))) R)
(*.f64 (*.f64 (/.f64 (+.f64 phi1 phi2) (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))))) (/.f64 (-.f64 phi1 phi2) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2))))) R)
(*.f64 (acos.f64 #s(literal 1 binary64)) R)
(*.f64 (acos.f64 (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2))) R)
(*.f64 (/.f64 (+.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (pow.f64 (neg.f64 lambda1) #s(literal 3 binary64))) (+.f64 (*.f64 lambda2 lambda2) (-.f64 (*.f64 (neg.f64 lambda1) (neg.f64 lambda1)) (*.f64 lambda2 (neg.f64 lambda1))))) R)
(*.f64 (acos.f64 (cos.f64 lambda1)) R)
(*.f64 (acos.f64 (cos.f64 lambda2)) R)
(*.f64 (acos.f64 (cos.f64 phi1)) R)
(*.f64 (acos.f64 (cos.f64 phi2)) R)
(*.f64 (acos.f64 (cos.f64 (-.f64 lambda1 lambda2))) R)
(*.f64 (acos.f64 (cos.f64 (-.f64 phi2 phi1))) R)
(*.f64 (acos.f64 (*.f64 lambda1 (sin.f64 lambda2))) R)
(*.f64 (fabs.f64 (remainder.f64 (-.f64 lambda1 lambda2) (*.f64 #s(literal 2 binary64) (PI.f64)))) R)
(*.f64 (fabs.f64 (remainder.f64 (-.f64 lambda2 lambda1) (*.f64 #s(literal 2 binary64) (PI.f64)))) R)
(*.f64 (fabs.f64 (remainder.f64 (-.f64 phi1 phi2) (*.f64 #s(literal 2 binary64) (PI.f64)))) R)
(*.f64 (acos.f64 (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))) R)
(*.f64 (acos.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1/2 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal 1/24 binary64)))))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))))))) R)
(*.f64 (acos.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1/2 binary64) (*.f64 phi1 (*.f64 phi1 (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64)))))))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 lambda1))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 lambda2))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) R)
Outputs
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) R)
Calls

6 calls:

12.0ms
phi2
11.0ms
(cos.f64 (-.f64 lambda1 lambda2))
11.0ms
phi1
10.0ms
lambda1
10.0ms
(-.f64 lambda1 lambda2)
Results
AccuracySegmentsBranch
50.6%2(-.f64 lambda1 lambda2)
50.6%2(cos.f64 (-.f64 lambda1 lambda2))
46.3%2lambda2
42.9%1lambda1
55.3%2phi2
50.6%2phi1
Compiler

Compiled 41 to 33 computations (19.5% saved)

regimes82.0ms (0.3%)

Memory
25.0MiB live, 103.0MiB allocated
Counts
34 → 2
Calls
Call 1
Inputs
(*.f64 lambda1 R)
(*.f64 (-.f64 lambda2 lambda1) R)
(*.f64 (-.f64 phi1 phi2) R)
(-.f64 #s(literal 0 binary64) (*.f64 R lambda2))
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2))) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2)) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)) (+.f64 lambda2 lambda1)) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (*.f64 lambda1 (*.f64 lambda1 lambda1))) (+.f64 (*.f64 lambda2 lambda2) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda2)))) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (*.f64 lambda1 (*.f64 lambda1 lambda1))) (+.f64 (*.f64 lambda2 lambda2) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda1)))) R)
(*.f64 (*.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (+.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (-.f64 phi2 phi1)))) R)
(*.f64 (/.f64 (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))) R)
(*.f64 (*.f64 (/.f64 (+.f64 phi1 phi2) (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))))) (/.f64 (-.f64 phi1 phi2) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2))))) R)
(*.f64 (acos.f64 #s(literal 1 binary64)) R)
(*.f64 (acos.f64 (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2))) R)
(*.f64 (/.f64 (+.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (pow.f64 (neg.f64 lambda1) #s(literal 3 binary64))) (+.f64 (*.f64 lambda2 lambda2) (-.f64 (*.f64 (neg.f64 lambda1) (neg.f64 lambda1)) (*.f64 lambda2 (neg.f64 lambda1))))) R)
(*.f64 (acos.f64 (cos.f64 lambda1)) R)
(*.f64 (acos.f64 (cos.f64 lambda2)) R)
(*.f64 (acos.f64 (cos.f64 phi1)) R)
(*.f64 (acos.f64 (cos.f64 phi2)) R)
(*.f64 (acos.f64 (cos.f64 (-.f64 lambda1 lambda2))) R)
(*.f64 (acos.f64 (cos.f64 (-.f64 phi2 phi1))) R)
(*.f64 (acos.f64 (*.f64 lambda1 (sin.f64 lambda2))) R)
(*.f64 (fabs.f64 (remainder.f64 (-.f64 lambda1 lambda2) (*.f64 #s(literal 2 binary64) (PI.f64)))) R)
(*.f64 (fabs.f64 (remainder.f64 (-.f64 lambda2 lambda1) (*.f64 #s(literal 2 binary64) (PI.f64)))) R)
(*.f64 (fabs.f64 (remainder.f64 (-.f64 phi1 phi2) (*.f64 #s(literal 2 binary64) (PI.f64)))) R)
(*.f64 (acos.f64 (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))) R)
(*.f64 (acos.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1/2 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal 1/24 binary64)))))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))))))) R)
(*.f64 (acos.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1/2 binary64) (*.f64 phi1 (*.f64 phi1 (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64)))))))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 lambda1))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 lambda2))) R)
Outputs
(*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 lambda1))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) R)
Calls

6 calls:

21.0ms
R
17.0ms
(cos.f64 (-.f64 lambda1 lambda2))
10.0ms
phi2
10.0ms
phi1
10.0ms
lambda2
Results
AccuracySegmentsBranch
46.3%3lambda2
37.7%3R
46.0%2phi1
42.1%3(cos.f64 (-.f64 lambda1 lambda2))
42.6%3(-.f64 lambda1 lambda2)
45.8%2phi2
Compiler

Compiled 41 to 33 computations (19.5% saved)

regimes108.0ms (0.4%)

Memory
8.9MiB live, 88.7MiB allocated
Counts
32 → 3
Calls
Call 1
Inputs
(*.f64 lambda1 R)
(*.f64 (-.f64 lambda2 lambda1) R)
(*.f64 (-.f64 phi1 phi2) R)
(-.f64 #s(literal 0 binary64) (*.f64 R lambda2))
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2))) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2)) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)) (+.f64 lambda2 lambda1)) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (*.f64 lambda1 (*.f64 lambda1 lambda1))) (+.f64 (*.f64 lambda2 lambda2) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda2)))) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (*.f64 lambda1 (*.f64 lambda1 lambda1))) (+.f64 (*.f64 lambda2 lambda2) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda1)))) R)
(*.f64 (*.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (+.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (-.f64 phi2 phi1)))) R)
(*.f64 (/.f64 (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))) R)
(*.f64 (*.f64 (/.f64 (+.f64 phi1 phi2) (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))))) (/.f64 (-.f64 phi1 phi2) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2))))) R)
(*.f64 (acos.f64 #s(literal 1 binary64)) R)
(*.f64 (acos.f64 (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2))) R)
(*.f64 (/.f64 (+.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (pow.f64 (neg.f64 lambda1) #s(literal 3 binary64))) (+.f64 (*.f64 lambda2 lambda2) (-.f64 (*.f64 (neg.f64 lambda1) (neg.f64 lambda1)) (*.f64 lambda2 (neg.f64 lambda1))))) R)
(*.f64 (acos.f64 (cos.f64 lambda1)) R)
(*.f64 (acos.f64 (cos.f64 lambda2)) R)
(*.f64 (acos.f64 (cos.f64 phi1)) R)
(*.f64 (acos.f64 (cos.f64 phi2)) R)
(*.f64 (acos.f64 (cos.f64 (-.f64 lambda1 lambda2))) R)
(*.f64 (acos.f64 (cos.f64 (-.f64 phi2 phi1))) R)
(*.f64 (acos.f64 (*.f64 lambda1 (sin.f64 lambda2))) R)
(*.f64 (fabs.f64 (remainder.f64 (-.f64 lambda1 lambda2) (*.f64 #s(literal 2 binary64) (PI.f64)))) R)
(*.f64 (fabs.f64 (remainder.f64 (-.f64 lambda2 lambda1) (*.f64 #s(literal 2 binary64) (PI.f64)))) R)
(*.f64 (fabs.f64 (remainder.f64 (-.f64 phi1 phi2) (*.f64 #s(literal 2 binary64) (PI.f64)))) R)
(*.f64 (acos.f64 (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))) R)
(*.f64 (acos.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1/2 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal 1/24 binary64)))))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))))))) R)
(*.f64 (acos.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1/2 binary64) (*.f64 phi1 (*.f64 phi1 (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64)))))))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) R)
Outputs
(*.f64 (acos.f64 (cos.f64 (-.f64 lambda1 lambda2))) R)
(*.f64 (acos.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) R)
(*.f64 (acos.f64 (cos.f64 (-.f64 phi2 phi1))) R)
Calls

6 calls:

40.0ms
lambda1
26.0ms
phi1
10.0ms
phi2
9.0ms
lambda2
9.0ms
(cos.f64 (-.f64 lambda1 lambda2))
Results
AccuracySegmentsBranch
42.1%3(cos.f64 (-.f64 lambda1 lambda2))
40.2%2(-.f64 lambda1 lambda2)
41.2%3lambda1
38.4%2lambda2
40.7%3phi2
39.9%2phi1
Compiler

Compiled 41 to 33 computations (19.5% saved)

regimes62.0ms (0.3%)

Memory
-31.2MiB live, 46.5MiB allocated
Counts
31 → 2
Calls
Call 1
Inputs
(*.f64 lambda1 R)
(*.f64 (-.f64 lambda2 lambda1) R)
(*.f64 (-.f64 phi1 phi2) R)
(-.f64 #s(literal 0 binary64) (*.f64 R lambda2))
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2))) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2)) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)) (+.f64 lambda2 lambda1)) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (*.f64 lambda1 (*.f64 lambda1 lambda1))) (+.f64 (*.f64 lambda2 lambda2) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda2)))) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (*.f64 lambda1 (*.f64 lambda1 lambda1))) (+.f64 (*.f64 lambda2 lambda2) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda1)))) R)
(*.f64 (*.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (+.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (-.f64 phi2 phi1)))) R)
(*.f64 (/.f64 (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))) R)
(*.f64 (*.f64 (/.f64 (+.f64 phi1 phi2) (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))))) (/.f64 (-.f64 phi1 phi2) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2))))) R)
(*.f64 (acos.f64 #s(literal 1 binary64)) R)
(*.f64 (acos.f64 (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2))) R)
(*.f64 (/.f64 (+.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (pow.f64 (neg.f64 lambda1) #s(literal 3 binary64))) (+.f64 (*.f64 lambda2 lambda2) (-.f64 (*.f64 (neg.f64 lambda1) (neg.f64 lambda1)) (*.f64 lambda2 (neg.f64 lambda1))))) R)
(*.f64 (acos.f64 (cos.f64 lambda1)) R)
(*.f64 (acos.f64 (cos.f64 lambda2)) R)
(*.f64 (acos.f64 (cos.f64 phi1)) R)
(*.f64 (acos.f64 (cos.f64 phi2)) R)
(*.f64 (acos.f64 (cos.f64 (-.f64 lambda1 lambda2))) R)
(*.f64 (acos.f64 (cos.f64 (-.f64 phi2 phi1))) R)
(*.f64 (acos.f64 (*.f64 lambda1 (sin.f64 lambda2))) R)
(*.f64 (fabs.f64 (remainder.f64 (-.f64 lambda1 lambda2) (*.f64 #s(literal 2 binary64) (PI.f64)))) R)
(*.f64 (fabs.f64 (remainder.f64 (-.f64 lambda2 lambda1) (*.f64 #s(literal 2 binary64) (PI.f64)))) R)
(*.f64 (fabs.f64 (remainder.f64 (-.f64 phi1 phi2) (*.f64 #s(literal 2 binary64) (PI.f64)))) R)
(*.f64 (acos.f64 (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))) R)
(*.f64 (acos.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1/2 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal 1/24 binary64)))))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(*.f64 (acos.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))))))) R)
(*.f64 (acos.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1/2 binary64) (*.f64 phi1 (*.f64 phi1 (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64)))))))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
Outputs
(*.f64 (acos.f64 (cos.f64 (-.f64 lambda1 lambda2))) R)
(*.f64 (acos.f64 (cos.f64 (-.f64 phi2 phi1))) R)
Calls

2 calls:

17.0ms
(cos.f64 (-.f64 lambda1 lambda2))
9.0ms
(-.f64 lambda1 lambda2)
Results
AccuracySegmentsBranch
40.2%2(-.f64 lambda1 lambda2)
40.1%2(cos.f64 (-.f64 lambda1 lambda2))
Compiler

Compiled 17 to 13 computations (23.5% saved)

regimes67.0ms (0.3%)

Memory
36.7MiB live, 74.8MiB allocated
Counts
21 → 3
Calls
Call 1
Inputs
(*.f64 lambda1 R)
(*.f64 (-.f64 lambda2 lambda1) R)
(*.f64 (-.f64 phi1 phi2) R)
(-.f64 #s(literal 0 binary64) (*.f64 R lambda2))
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2))) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2)) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)) (+.f64 lambda2 lambda1)) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (*.f64 lambda1 (*.f64 lambda1 lambda1))) (+.f64 (*.f64 lambda2 lambda2) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda2)))) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (*.f64 lambda1 (*.f64 lambda1 lambda1))) (+.f64 (*.f64 lambda2 lambda2) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda1)))) R)
(*.f64 (*.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (+.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (-.f64 phi2 phi1)))) R)
(*.f64 (/.f64 (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))) R)
(*.f64 (*.f64 (/.f64 (+.f64 phi1 phi2) (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))))) (/.f64 (-.f64 phi1 phi2) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2))))) R)
(*.f64 (acos.f64 #s(literal 1 binary64)) R)
(*.f64 (acos.f64 (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2))) R)
(*.f64 (/.f64 (+.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (pow.f64 (neg.f64 lambda1) #s(literal 3 binary64))) (+.f64 (*.f64 lambda2 lambda2) (-.f64 (*.f64 (neg.f64 lambda1) (neg.f64 lambda1)) (*.f64 lambda2 (neg.f64 lambda1))))) R)
(*.f64 (acos.f64 (cos.f64 lambda1)) R)
(*.f64 (acos.f64 (cos.f64 lambda2)) R)
(*.f64 (acos.f64 (cos.f64 phi1)) R)
(*.f64 (acos.f64 (cos.f64 phi2)) R)
(*.f64 (acos.f64 (cos.f64 (-.f64 lambda1 lambda2))) R)
Outputs
(*.f64 (acos.f64 (cos.f64 phi1)) R)
(*.f64 (acos.f64 (cos.f64 (-.f64 lambda1 lambda2))) R)
(*.f64 (acos.f64 (cos.f64 phi2)) R)
Calls

7 calls:

24.0ms
lambda1
7.0ms
(-.f64 lambda1 lambda2)
7.0ms
phi2
7.0ms
R
7.0ms
phi1
Results
AccuracySegmentsBranch
24.8%1R
30.3%3lambda2
35.8%3phi2
29.7%3lambda1
36.3%3phi1
33.4%2(cos.f64 (-.f64 lambda1 lambda2))
33.4%2(-.f64 lambda1 lambda2)
Compiler

Compiled 47 to 38 computations (19.1% saved)

regimes29.0ms (0.1%)

Memory
-17.5MiB live, 25.2MiB allocated
Counts
20 → 3
Calls
Call 1
Inputs
(*.f64 lambda1 R)
(*.f64 (-.f64 lambda2 lambda1) R)
(*.f64 (-.f64 phi1 phi2) R)
(-.f64 #s(literal 0 binary64) (*.f64 R lambda2))
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2))) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2)) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)) (+.f64 lambda2 lambda1)) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (*.f64 lambda1 (*.f64 lambda1 lambda1))) (+.f64 (*.f64 lambda2 lambda2) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda2)))) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (*.f64 lambda1 (*.f64 lambda1 lambda1))) (+.f64 (*.f64 lambda2 lambda2) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda1)))) R)
(*.f64 (*.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (+.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (-.f64 phi2 phi1)))) R)
(*.f64 (/.f64 (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))) R)
(*.f64 (*.f64 (/.f64 (+.f64 phi1 phi2) (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))))) (/.f64 (-.f64 phi1 phi2) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2))))) R)
(*.f64 (acos.f64 #s(literal 1 binary64)) R)
(*.f64 (acos.f64 (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2))) R)
(*.f64 (/.f64 (+.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (pow.f64 (neg.f64 lambda1) #s(literal 3 binary64))) (+.f64 (*.f64 lambda2 lambda2) (-.f64 (*.f64 (neg.f64 lambda1) (neg.f64 lambda1)) (*.f64 lambda2 (neg.f64 lambda1))))) R)
(*.f64 (acos.f64 (cos.f64 lambda1)) R)
(*.f64 (acos.f64 (cos.f64 lambda2)) R)
(*.f64 (acos.f64 (cos.f64 phi1)) R)
(*.f64 (acos.f64 (cos.f64 phi2)) R)
Outputs
(*.f64 (acos.f64 (cos.f64 phi1)) R)
(*.f64 (acos.f64 (cos.f64 lambda2)) R)
(*.f64 (acos.f64 (cos.f64 phi2)) R)
Calls

2 calls:

19.0ms
phi1
6.0ms
phi2
Results
AccuracySegmentsBranch
29.5%2phi2
31.3%3phi1
Compiler

Compiled 12 to 10 computations (16.7% saved)

regimes41.0ms (0.2%)

Memory
1.3MiB live, 39.8MiB allocated
Counts
19 → 3
Calls
Call 1
Inputs
(*.f64 lambda1 R)
(*.f64 (-.f64 lambda2 lambda1) R)
(*.f64 (-.f64 phi1 phi2) R)
(-.f64 #s(literal 0 binary64) (*.f64 R lambda2))
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2))) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2)) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)) (+.f64 lambda2 lambda1)) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (*.f64 lambda1 (*.f64 lambda1 lambda1))) (+.f64 (*.f64 lambda2 lambda2) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda2)))) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (*.f64 lambda1 (*.f64 lambda1 lambda1))) (+.f64 (*.f64 lambda2 lambda2) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda1)))) R)
(*.f64 (*.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (+.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (-.f64 phi2 phi1)))) R)
(*.f64 (/.f64 (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))) R)
(*.f64 (*.f64 (/.f64 (+.f64 phi1 phi2) (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))))) (/.f64 (-.f64 phi1 phi2) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2))))) R)
(*.f64 (acos.f64 #s(literal 1 binary64)) R)
(*.f64 (acos.f64 (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2))) R)
(*.f64 (/.f64 (+.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (pow.f64 (neg.f64 lambda1) #s(literal 3 binary64))) (+.f64 (*.f64 lambda2 lambda2) (-.f64 (*.f64 (neg.f64 lambda1) (neg.f64 lambda1)) (*.f64 lambda2 (neg.f64 lambda1))))) R)
(*.f64 (acos.f64 (cos.f64 lambda1)) R)
(*.f64 (acos.f64 (cos.f64 lambda2)) R)
(*.f64 (acos.f64 (cos.f64 phi1)) R)
Outputs
(*.f64 (acos.f64 (cos.f64 lambda1)) R)
(*.f64 (acos.f64 (cos.f64 phi1)) R)
(*.f64 (acos.f64 (cos.f64 lambda2)) R)
Calls

4 calls:

20.0ms
phi2
6.0ms
lambda2
6.0ms
phi1
6.0ms
lambda1
Results
AccuracySegmentsBranch
28.3%3lambda1
26.4%2lambda2
20.5%2phi2
26.4%2phi1
Compiler

Compiled 24 to 20 computations (16.7% saved)

regimes45.0ms (0.2%)

Memory
-5.1MiB live, 33.8MiB allocated
Counts
18 → 2
Calls
Call 1
Inputs
(*.f64 lambda1 R)
(*.f64 (-.f64 lambda2 lambda1) R)
(*.f64 (-.f64 phi1 phi2) R)
(-.f64 #s(literal 0 binary64) (*.f64 R lambda2))
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2))) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2)) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)) (+.f64 lambda2 lambda1)) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (*.f64 lambda1 (*.f64 lambda1 lambda1))) (+.f64 (*.f64 lambda2 lambda2) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda2)))) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (*.f64 lambda1 (*.f64 lambda1 lambda1))) (+.f64 (*.f64 lambda2 lambda2) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda1)))) R)
(*.f64 (*.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (+.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (-.f64 phi2 phi1)))) R)
(*.f64 (/.f64 (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))) R)
(*.f64 (*.f64 (/.f64 (+.f64 phi1 phi2) (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))))) (/.f64 (-.f64 phi1 phi2) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2))))) R)
(*.f64 (acos.f64 #s(literal 1 binary64)) R)
(*.f64 (acos.f64 (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2))) R)
(*.f64 (/.f64 (+.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (pow.f64 (neg.f64 lambda1) #s(literal 3 binary64))) (+.f64 (*.f64 lambda2 lambda2) (-.f64 (*.f64 (neg.f64 lambda1) (neg.f64 lambda1)) (*.f64 lambda2 (neg.f64 lambda1))))) R)
(*.f64 (acos.f64 (cos.f64 lambda1)) R)
(*.f64 (acos.f64 (cos.f64 lambda2)) R)
Outputs
(*.f64 (acos.f64 (cos.f64 lambda1)) R)
(*.f64 (acos.f64 (cos.f64 lambda2)) R)
Calls

4 calls:

25.0ms
R
6.0ms
lambda1
6.0ms
lambda2
6.0ms
phi1
Results
AccuracySegmentsBranch
24.8%2lambda2
19.1%2R
18.1%2phi1
24.8%2lambda1
Compiler

Compiled 24 to 20 computations (16.7% saved)

regimes20.0ms (0.1%)

Memory
22.7MiB live, 22.7MiB allocated
Counts
17 → 2
Calls
Call 1
Inputs
(*.f64 lambda1 R)
(*.f64 (-.f64 lambda2 lambda1) R)
(*.f64 (-.f64 phi1 phi2) R)
(-.f64 #s(literal 0 binary64) (*.f64 R lambda2))
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2))) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2)) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)) (+.f64 lambda2 lambda1)) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (*.f64 lambda1 (*.f64 lambda1 lambda1))) (+.f64 (*.f64 lambda2 lambda2) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda2)))) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (*.f64 lambda1 (*.f64 lambda1 lambda1))) (+.f64 (*.f64 lambda2 lambda2) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda1)))) R)
(*.f64 (*.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (+.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (-.f64 phi2 phi1)))) R)
(*.f64 (/.f64 (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))) R)
(*.f64 (*.f64 (/.f64 (+.f64 phi1 phi2) (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))))) (/.f64 (-.f64 phi1 phi2) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2))))) R)
(*.f64 (acos.f64 #s(literal 1 binary64)) R)
(*.f64 (acos.f64 (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2))) R)
(*.f64 (/.f64 (+.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (pow.f64 (neg.f64 lambda1) #s(literal 3 binary64))) (+.f64 (*.f64 lambda2 lambda2) (-.f64 (*.f64 (neg.f64 lambda1) (neg.f64 lambda1)) (*.f64 lambda2 (neg.f64 lambda1))))) R)
(*.f64 (acos.f64 (cos.f64 lambda1)) R)
Outputs
(*.f64 (acos.f64 (cos.f64 lambda1)) R)
(*.f64 (-.f64 lambda2 lambda1) R)
Calls

3 calls:

6.0ms
lambda1
6.0ms
lambda2
6.0ms
phi2
Results
AccuracySegmentsBranch
16.5%1phi2
19.2%2lambda1
16.5%1lambda2
Compiler

Compiled 18 to 15 computations (16.7% saved)

regimes70.0ms (0.3%)

Memory
-43.9MiB live, 42.0MiB allocated
Counts
16 → 1
Calls
Call 1
Inputs
(*.f64 lambda1 R)
(*.f64 (-.f64 lambda2 lambda1) R)
(*.f64 (-.f64 phi1 phi2) R)
(-.f64 #s(literal 0 binary64) (*.f64 R lambda2))
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1))) R)
(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2))) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2)) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)) (+.f64 lambda2 lambda1)) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (*.f64 lambda1 (*.f64 lambda1 lambda1))) (+.f64 (*.f64 lambda2 lambda2) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda2)))) R)
(*.f64 (/.f64 (-.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (*.f64 lambda1 (*.f64 lambda1 lambda1))) (+.f64 (*.f64 lambda2 lambda2) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda1)))) R)
(*.f64 (*.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (+.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (-.f64 phi2 phi1)))) R)
(*.f64 (/.f64 (-.f64 (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))) R)
(*.f64 (*.f64 (/.f64 (+.f64 phi1 phi2) (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))))) (/.f64 (-.f64 phi1 phi2) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2))))) R)
(*.f64 (acos.f64 #s(literal 1 binary64)) R)
(*.f64 (acos.f64 (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2))) R)
(*.f64 (/.f64 (+.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (pow.f64 (neg.f64 lambda1) #s(literal 3 binary64))) (+.f64 (*.f64 lambda2 lambda2) (-.f64 (*.f64 (neg.f64 lambda1) (neg.f64 lambda1)) (*.f64 lambda2 (neg.f64 lambda1))))) R)
Outputs
(*.f64 (-.f64 lambda2 lambda1) R)
Calls

5 calls:

34.0ms
lambda1
5.0ms
R
5.0ms
phi2
5.0ms
phi1
5.0ms
lambda2
Results
AccuracySegmentsBranch
9.4%1lambda2
9.4%1phi2
9.4%1phi1
9.4%1R
9.4%1lambda1
Compiler

Compiled 30 to 25 computations (16.7% saved)

regimes7.0ms (0%)

Memory
11.9MiB live, 11.9MiB allocated
Accuracy

Total -0.0b remaining (-0%)

Threshold costs -0b (-0%)

Counts
1 → 1
Calls
Call 1
Inputs
(*.f64 lambda1 R)
Outputs
(*.f64 lambda1 R)
Calls

5 calls:

1.0ms
lambda2
1.0ms
phi1
1.0ms
R
1.0ms
phi2
1.0ms
lambda1
Results
AccuracySegmentsBranch
3.9%1phi2
3.9%1lambda1
3.9%1R
3.9%1lambda2
3.9%1phi1
Compiler

Compiled 30 to 25 computations (16.7% saved)

bsearch3.0ms (0%)

Memory
4.0MiB live, 4.0MiB allocated
Algorithm
1×left-value
Steps
TimeLeftRight
0.0ms
0.0
9.541398640621977e-8
Compiler

Compiled 27 to 25 computations (7.4% saved)

bsearch2.0ms (0%)

Memory
2.5MiB live, 2.5MiB allocated
Algorithm
1×left-value
Steps
TimeLeftRight
0.0ms
0.0
9.541398640621977e-8
Compiler

Compiled 27 to 25 computations (7.4% saved)

bsearch173.0ms (0.7%)

Memory
12.0MiB live, 169.6MiB allocated
Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
81.0ms
6.891156842617053e-10
1.3595259869579238e-7
84.0ms
-45488970.531162865
-1.0398663563857076e-20
Samples
131.0ms225×1valid
10.0ms63×0valid
Compiler

Compiled 999 to 709 computations (29% saved)

Precisions
Click to see histograms. Total time spent on operations: 127.0ms
ival-cos: 66.0ms (51.9% of total)
ival-sin: 20.0ms (15.7% of total)
ival-mult: 12.0ms (9.4% of total)
ival-add: 11.0ms (8.7% of total)
ival-acos: 10.0ms (7.9% of total)
adjust: 5.0ms (3.9% of total)
ival-sub: 2.0ms (1.6% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch167.0ms (0.7%)

Memory
10.5MiB live, 167.1MiB allocated
Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
47.0ms
6.891156842617053e-10
1.3595259869579238e-7
111.0ms
-45488970.531162865
-1.0398663563857076e-20
Samples
141.0ms251×1valid
6.0ms37×0valid
Compiler

Compiled 963 to 691 computations (28.2% saved)

Precisions
Click to see histograms. Total time spent on operations: 124.0ms
ival-mult: 44.0ms (35.6% of total)
ival-cos: 34.0ms (27.5% of total)
ival-sin: 23.0ms (18.6% of total)
ival-acos: 11.0ms (8.9% of total)
adjust: 6.0ms (4.9% 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)

bsearch159.0ms (0.6%)

Memory
6.2MiB live, 123.3MiB allocated
Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
44.0ms
6.891156842617053e-10
1.3595259869579238e-7
107.0ms
-45488970.531162865
-1.0398663563857076e-20
Samples
132.0ms242×1valid
8.0ms46×0valid
Compiler

Compiled 855 to 619 computations (27.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 126.0ms
ival-acos: 37.0ms (29.4% of total)
ival-cos: 31.0ms (24.6% of total)
ival-sin: 25.0ms (19.9% of total)
ival-mult: 13.0ms (10.3% of total)
ival-add: 12.0ms (9.5% of total)
adjust: 6.0ms (4.8% of total)
ival-sub: 2.0ms (1.6% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch214.0ms (0.9%)

Memory
-9.2MiB live, 144.2MiB allocated
Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
117.0ms
6.891156842617053e-10
1.3595259869579238e-7
84.0ms
-45488970.531162865
-1.0398663563857076e-20
Samples
149.0ms246×1valid
7.0ms42×0valid
Compiler

Compiled 873 to 637 computations (27% saved)

Precisions
Click to see histograms. Total time spent on operations: 142.0ms
ival-cos: 86.0ms (60.4% of total)
ival-sin: 22.0ms (15.4% of total)
ival-mult: 13.0ms (9.1% of total)
ival-acos: 10.0ms (7% of total)
adjust: 6.0ms (4.2% of total)
ival-sub: 3.0ms (2.1% of total)
ival-add: 2.0ms (1.4% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch176.0ms (0.7%)

Memory
8.4MiB live, 213.9MiB allocated
Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
46.0ms
6.891156842617053e-10
1.3595259869579238e-7
121.0ms
-45488970.531162865
-1.0398663563857076e-20
Samples
146.0ms245×1valid
10.0ms43×0valid
Compiler

Compiled 891 to 655 computations (26.5% saved)

Precisions
Click to see histograms. Total time spent on operations: 140.0ms
ival-cos: 81.0ms (57.8% of total)
ival-sin: 22.0ms (15.7% of total)
ival-mult: 13.0ms (9.3% of total)
ival-acos: 12.0ms (8.6% of total)
adjust: 6.0ms (4.3% of total)
ival-sub: 3.0ms (2.1% of total)
ival-add: 3.0ms (2.1% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch125.0ms (0.5%)

Memory
5.0MiB live, 238.1MiB allocated
Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
63.0ms
1.3036861286335858e-15
1.3704393420588085e-6
52.0ms
-8.923481957505273e-8
-4.866704598595677e-12
Samples
79.0ms164×1valid
26.0ms108×0valid
Compiler

Compiled 809 to 603 computations (25.5% saved)

Precisions
Click to see histograms. Total time spent on operations: 92.0ms
ival-cos: 32.0ms (34.7% of total)
ival-sin: 23.0ms (24.9% of total)
ival-mult: 13.0ms (14.1% of total)
ival-add: 10.0ms (10.8% of total)
ival-acos: 8.0ms (8.7% of total)
adjust: 4.0ms (4.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)

bsearch153.0ms (0.6%)

Memory
-11.2MiB live, 306.2MiB allocated
Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
87.0ms
1.644718687789368e-38
1.7864394208273148e-7
55.0ms
-9.53702663925971e-8
-4.855409122828274e-11
Samples
108.0ms253×1valid
23.0ms51×0valid
Compiler

Compiled 901 to 671 computations (25.5% saved)

Precisions
Click to see histograms. Total time spent on operations: 115.0ms
ival-cos: 34.0ms (29.5% of total)
ival-sin: 34.0ms (29.5% of total)
ival-mult: 20.0ms (17.3% of total)
ival-acos: 12.0ms (10.4% of total)
adjust: 9.0ms (7.8% of total)
ival-sub: 3.0ms (2.6% of total)
ival-add: 2.0ms (1.7% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch58.0ms (0.2%)

Memory
-2.4MiB live, 119.4MiB allocated
Algorithm
1×binary-search
Stop Event
1×narrow-enough
Steps
TimeLeftRight
54.0ms
-9.53702663925971e-8
-4.855409122828274e-11
Samples
44.0ms104×1valid
4.0ms24×0valid
Compiler

Compiled 395 to 297 computations (24.8% saved)

Precisions
Click to see histograms. Total time spent on operations: 42.0ms
ival-cos: 17.0ms (40% of total)
ival-sin: 10.0ms (23.5% of total)
ival-mult: 6.0ms (14.1% of total)
ival-acos: 5.0ms (11.8% of total)
adjust: 2.0ms (4.7% 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)

bsearch66.0ms (0.3%)

Memory
-15.5MiB live, 143.2MiB allocated
Algorithm
1×binary-search
Stop Event
1×narrow-enough
Steps
TimeLeftRight
60.0ms
1.3595259869579238e-7
252853.58543033045
Samples
47.0ms120×1valid
7.0ms40×0valid
Compiler

Compiled 417 to 315 computations (24.5% saved)

Precisions
Click to see histograms. Total time spent on operations: 46.0ms
ival-cos: 17.0ms (37.3% of total)
ival-sin: 11.0ms (24.2% of total)
ival-mult: 7.0ms (15.4% of total)
ival-acos: 5.0ms (11% of total)
adjust: 3.0ms (6.6% of total)
ival-sub: 1.0ms (2.2% of total)
ival-add: 1.0ms (2.2% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch138.0ms (0.6%)

Memory
20.1MiB live, 310.6MiB allocated
Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
59.0ms
1.3595259869579238e-7
252853.58543033045
70.0ms
-2.6655931560619763e-49
-4.400688089246328e-62
Samples
103.0ms243×1valid
13.0ms77×0valid
Compiler

Compiled 967 to 715 computations (26.1% saved)

Precisions
Click to see histograms. Total time spent on operations: 100.0ms
ival-cos: 38.0ms (37.9% of total)
ival-sin: 25.0ms (25% of total)
ival-mult: 17.0ms (17% of total)
ival-acos: 9.0ms (9% of total)
adjust: 6.0ms (6% of total)
ival-sub: 3.0ms (3% of total)
ival-add: 2.0ms (2% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch60.0ms (0.2%)

Memory
-26.9MiB live, 131.4MiB allocated
Algorithm
1×binary-search
Stop Event
1×narrow-enough
Steps
TimeLeftRight
54.0ms
-9.53702663925971e-8
-4.855409122828274e-11
Samples
43.0ms105×1valid
6.0ms23×0valid
Compiler

Compiled 283 to 217 computations (23.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 41.0ms
ival-cos: 13.0ms (31.6% of total)
ival-sin: 10.0ms (24.3% of total)
ival-acos: 7.0ms (17% of total)
ival-mult: 6.0ms (14.6% of total)
adjust: 2.0ms (4.9% 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)

bsearch64.0ms (0.3%)

Memory
10.4MiB live, 123.7MiB allocated
Algorithm
1×binary-search
Stop Event
1×narrow-enough
Steps
TimeLeftRight
59.0ms
1.3595259869579238e-7
252853.58543033045
Samples
44.0ms111×1valid
7.0ms49×0valid
Compiler

Compiled 327 to 255 computations (22% saved)

Precisions
Click to see histograms. Total time spent on operations: 44.0ms
ival-cos: 17.0ms (38.8% of total)
ival-sin: 11.0ms (25.1% of total)
ival-mult: 6.0ms (13.7% of total)
ival-acos: 4.0ms (9.1% of total)
adjust: 2.0ms (4.6% of total)
ival-sub: 1.0ms (2.3% of total)
ival-add: 1.0ms (2.3% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch79.0ms (0.3%)

Memory
3.4MiB live, 82.9MiB allocated
Algorithm
1×binary-search
Stop Event
1×narrow-enough
Steps
TimeLeftRight
76.0ms
-9.53702663925971e-8
-4.855409122828274e-11
Samples
51.0ms105×1valid
4.0ms23×0valid
Compiler

Compiled 251 to 201 computations (19.9% saved)

Precisions
Click to see histograms. Total time spent on operations: 37.0ms
ival-cos: 13.0ms (35.1% of total)
ival-sin: 9.0ms (24.3% of total)
ival-mult: 5.0ms (13.5% of total)
ival-acos: 5.0ms (13.5% of total)
adjust: 2.0ms (5.4% of total)
ival-sub: 1.0ms (2.7% of total)
ival-add: 1.0ms (2.7% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch1.0ms (0%)

Memory
2.2MiB live, 2.2MiB allocated
Algorithm
2×left-value
Steps
TimeLeftRight
0.0ms
0.9994108421173973
0.9994343929791444
0.0ms
0.8335328419491786
0.8373724946407141
Compiler

Compiled 27 to 25 computations (7.4% saved)

bsearch0.0ms (0%)

Memory
0.5MiB live, 0.5MiB allocated
Algorithm
1×left-value
Steps
TimeLeftRight
0.0ms
-5963.216009722095
-18.656033938011216
Compiler

Compiled 27 to 25 computations (7.4% saved)

bsearch107.0ms (0.4%)

Memory
12.3MiB live, 208.3MiB allocated
Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
51.0ms
3.6708792656937074e-218
2.342153193371133e-217
50.0ms
-968.8439959831458
-0.8606887581652374
Samples
82.0ms173×1valid
9.0ms50×0valid
1.0ms1×2valid
Compiler

Compiled 363 to 291 computations (19.8% saved)

Precisions
Click to see histograms. Total time spent on operations: 81.0ms
ival-cos: 39.0ms (48.4% of total)
ival-sin: 15.0ms (18.6% of total)
ival-mult: 12.0ms (14.9% of total)
ival-acos: 6.0ms (7.4% of total)
adjust: 4.0ms (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)

bsearch124.0ms (0.5%)

Memory
-14.0MiB live, 229.2MiB allocated
Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
49.0ms
-3.238513490027227e-183
-6.821689520334633e-185
66.0ms
-1.0929978619906655e-15
-4.192152989323516e-20
Samples
96.0ms202×1valid
6.0ms35×0valid
4.0ms3×2valid
Compiler

Compiled 357 to 295 computations (17.4% saved)

Precisions
Click to see histograms. Total time spent on operations: 95.0ms
ival-cos: 48.0ms (50.6% of total)
ival-sin: 18.0ms (19% of total)
ival-mult: 11.0ms (11.6% of total)
ival-acos: 9.0ms (9.5% of total)
adjust: 5.0ms (5.3% 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)

bsearch140.0ms (0.6%)

Memory
12.4MiB live, 248.0MiB allocated
Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
89.0ms
7.759632528234169e-245
3.032655872685871e-228
45.0ms
-18.656033938011216
-0.030994561326832537
Samples
62.0ms133×1valid
32.0ms5×2valid
30.0ms150×0valid
Compiler

Compiled 423 to 349 computations (17.5% saved)

Precisions
Click to see histograms. Total time spent on operations: 109.0ms
ival-cos: 63.0ms (57.9% of total)
ival-sin: 20.0ms (18.4% of total)
ival-mult: 10.0ms (9.2% of total)
ival-acos: 8.0ms (7.4% of total)
adjust: 3.0ms (2.8% of total)
ival-sub: 2.0ms (1.8% of total)
ival-add: 2.0ms (1.8% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch66.0ms (0.3%)

Memory
13.4MiB live, 93.6MiB allocated
Algorithm
1×binary-search
Stop Event
1×narrow-enough
Steps
TimeLeftRight
63.0ms
0.011202521569711136
707.6176504265065
Samples
30.0ms68×0valid
28.0ms60×1valid
Compiler

Compiled 203 to 169 computations (16.7% saved)

Precisions
Click to see histograms. Total time spent on operations: 53.0ms
ival-sin: 26.0ms (49.4% of total)
ival-cos: 15.0ms (28.5% of total)
ival-mult: 5.0ms (9.5% of total)
ival-acos: 3.0ms (5.7% of total)
ival-sub: 2.0ms (3.8% of total)
adjust: 1.0ms (1.9% of total)
ival-add: 1.0ms (1.9% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch50.0ms (0.2%)

Memory
-4.9MiB live, 112.1MiB allocated
Algorithm
1×binary-search
Stop Event
1×narrow-enough
Steps
TimeLeftRight
47.0ms
-8.923481957505273e-8
-4.866704598595677e-12
Samples
27.0ms64×1valid
16.0ms64×0valid
Compiler

Compiled 203 to 161 computations (20.7% saved)

Precisions
Click to see histograms. Total time spent on operations: 36.0ms
ival-cos: 14.0ms (39.1% of total)
ival-sin: 8.0ms (22.4% of total)
ival-mult: 7.0ms (19.6% of total)
ival-acos: 3.0ms (8.4% of total)
ival-sub: 1.0ms (2.8% of total)
adjust: 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)

simplify27.0ms (0.1%)

Memory
4.7MiB live, 51.8MiB allocated
Algorithm
1×egg-herbie
Rules
102×*-commutative_binary64
34×+-commutative_binary64
12×sub-neg_binary64
10×if-if-or-not_binary32
6×neg-sub0_binary64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0198804
1279804
2289804
3295804
4298804
Stop Event
1×saturated
Calls
Call 1
Inputs
(if (<=.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 0 binary64)) (*.f64 (-.f64 lambda2 lambda1) 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 lambda1) (sin.f64 lambda2)))))) R))
(if (<=.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 0 binary64)) (*.f64 (-.f64 lambda2 lambda1) R) (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R))
(if (<=.f64 phi2 #s(literal -4150517416584649/576460752303423488 binary64)) (*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R) (if (<=.f64 phi2 #s(literal 4911261142184431/37778931862957161709568 binary64)) (*.f64 (acos.f64 (+.f64 (*.f64 phi2 (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) (*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)))
(if (<=.f64 phi2 #s(literal -944473296573929/1180591620717411303424 binary64)) (*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R) (if (<=.f64 phi2 #s(literal 4911261142184431/37778931862957161709568 binary64)) (*.f64 (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 phi2 (sin.f64 phi1)))) R) (*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)))
(if (<=.f64 phi2 #s(literal -5609415803011879/38685626227668133590597632 binary64)) (*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R) (if (<=.f64 phi2 #s(literal 6346860552976803/302231454903657293676544 binary64)) (*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) R) (*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)))
(if (<=.f64 phi2 #s(literal -8510837770086989/38685626227668133590597632 binary64)) (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (if (<=.f64 phi2 #s(literal 7253554917687775/9671406556917033397649408 binary64)) (*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (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)) (cos.f64 (-.f64 lambda1 lambda2))))) R)))
(if (<=.f64 phi2 #s(literal -2011652563838743/38685626227668133590597632 binary64)) (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (if (<=.f64 phi2 #s(literal 7011769753764849/1208925819614629174706176 binary64)) (*.f64 (acos.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1))) R) (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)))
(if (<=.f64 lambda1 #s(literal -812247035053579/9444732965739290427392 binary64)) (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)))) R) (if (<=.f64 lambda1 #s(literal 2833419889721787/4722366482869645213696 binary64)) (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))) R) (*.f64 (acos.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))) R)))
(if (<=.f64 phi1 #s(literal -7177997053961861/75557863725914323419136 binary64)) (*.f64 (acos.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1))) R) (if (<=.f64 phi1 #s(literal 519460313115661/9444732965739290427392 binary64)) (*.f64 (acos.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))) R) (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))) R)))
(if (<=.f64 phi1 #s(literal -7177997053961861/75557863725914323419136 binary64)) (*.f64 (acos.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1))) R) (*.f64 (acos.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))) R))
(if (<=.f64 phi2 #s(literal 534955578137577/4611686018427387904 binary64)) (*.f64 (acos.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1))) R) (*.f64 (acos.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) R))
(if (<=.f64 phi2 #s(literal -6845298958456217/26328072917139296674479506920917608079723773850137277813577744384 binary64)) (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) R) (if (<=.f64 phi2 #s(literal 5908722711110091/144115188075855872 binary64)) (*.f64 (acos.f64 (+.f64 (*.f64 phi2 (sin.f64 phi1)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 phi2 (*.f64 phi2 #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R) (*.f64 (acos.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) R)))
(if (<=.f64 phi1 #s(literal -7177997053961861/75557863725914323419136 binary64)) (*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) R) (*.f64 (acos.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) R))
(if (<=.f64 phi2 #s(literal 3458764513820541/2305843009213693952 binary64)) (*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) R) (*.f64 (acos.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) R))
(if (<=.f64 phi1 #s(literal -7177997053961861/75557863725914323419136 binary64)) (*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 lambda1))) R) (*.f64 (acos.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) R))
(if (<=.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 940126422213591/1125899906842624 binary64)) (*.f64 (acos.f64 (cos.f64 (-.f64 lambda1 lambda2))) R) (if (<=.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4500987539586621/4503599627370496 binary64)) (*.f64 (acos.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) R) (*.f64 (acos.f64 (cos.f64 (-.f64 phi2 phi1))) R)))
(if (<=.f64 (-.f64 lambda1 lambda2) #s(literal -5000 binary64)) (*.f64 (acos.f64 (cos.f64 (-.f64 lambda1 lambda2))) R) (*.f64 (acos.f64 (cos.f64 (-.f64 phi2 phi1))) R))
(if (<=.f64 phi1 #s(literal -7926335344172073/9007199254740992 binary64)) (*.f64 (acos.f64 (cos.f64 phi1)) R) (if (<=.f64 phi1 #s(literal 5713266579666609/24840289476811342962383671815400040884110176273867145778224832608416815242982030181294054541258343647207803691154097171298745280705837030263108596400658898227271279616333598488804244570105575117204207987099463500014285549661056925696 binary64)) (*.f64 (acos.f64 (cos.f64 (-.f64 lambda1 lambda2))) R) (*.f64 (acos.f64 (cos.f64 phi2)) R)))
(if (<=.f64 phi1 #s(literal -5324132520958563/5070602400912917605986812821504 binary64)) (*.f64 (acos.f64 (cos.f64 phi1)) R) (if (<=.f64 phi1 #s(literal -3157483383822115/9568131466127621947163770315237577352582483950433331955534014747297500715462012198465648064079848065788579276806882658480425438483841942548911565191978080929321047135323978360596199778018349602045952 binary64)) (*.f64 (acos.f64 (cos.f64 lambda2)) R) (*.f64 (acos.f64 (cos.f64 phi2)) R)))
(if (<=.f64 lambda1 #s(literal -5188146770730811/72057594037927936 binary64)) (*.f64 (acos.f64 (cos.f64 lambda1)) R) (if (<=.f64 lambda1 #s(literal 7789781865825189/916444925391198758541401085877594831703095653509460880942126390473954048171292933099049096506388108013739504295007991042380699544226348054414240833330066547856411977855334787272537640367327320839841280263415847919229777715415602675691481187407177449472 binary64)) (*.f64 (acos.f64 (cos.f64 phi1)) R) (*.f64 (acos.f64 (cos.f64 lambda2)) R)))
(if (<=.f64 lambda2 #s(literal 3314649325744685/288230376151711744 binary64)) (*.f64 (acos.f64 (cos.f64 lambda1)) R) (*.f64 (acos.f64 (cos.f64 lambda2)) R))
(if (<=.f64 lambda1 #s(literal -2833419889721787/37778931862957161709568 binary64)) (*.f64 (acos.f64 (cos.f64 lambda1)) R) (*.f64 (-.f64 lambda2 lambda1) R))
(*.f64 (-.f64 lambda2 lambda1) R)
(*.f64 lambda1 R)
Outputs
(if (<=.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 0 binary64)) (*.f64 (-.f64 lambda2 lambda1) 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 lambda1) (sin.f64 lambda2)))))) R))
(if (<=.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 0 binary64)) (*.f64 (-.f64 lambda2 lambda1) R) (*.f64 R (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 lambda1) (sin.f64 lambda2))))))))
(if (<=.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 0 binary64)) (*.f64 (-.f64 lambda2 lambda1) R) (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R))
(if (<=.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 0 binary64)) (*.f64 (-.f64 lambda2 lambda1) R) (*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))))
(if (<=.f64 phi2 #s(literal -4150517416584649/576460752303423488 binary64)) (*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R) (if (<=.f64 phi2 #s(literal 4911261142184431/37778931862957161709568 binary64)) (*.f64 (acos.f64 (+.f64 (*.f64 phi2 (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R) (*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)))
(if (<=.f64 phi2 #s(literal -4150517416584649/576460752303423488 binary64)) (*.f64 R (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (if (<=.f64 phi2 #s(literal 4911261142184431/37778931862957161709568 binary64)) (*.f64 R (acos.f64 (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) phi2)))) (*.f64 R (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(if (<=.f64 phi2 #s(literal -944473296573929/1180591620717411303424 binary64)) (*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R) (if (<=.f64 phi2 #s(literal 4911261142184431/37778931862957161709568 binary64)) (*.f64 (acos.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1)) (*.f64 phi2 (sin.f64 phi1)))) R) (*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)))
(if (<=.f64 phi2 #s(literal -944473296573929/1180591620717411303424 binary64)) (*.f64 R (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (if (<=.f64 phi2 #s(literal 4911261142184431/37778931862957161709568 binary64)) (*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) phi2) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))) (*.f64 R (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(if (<=.f64 phi2 #s(literal -5609415803011879/38685626227668133590597632 binary64)) (*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R) (if (<=.f64 phi2 #s(literal 6346860552976803/302231454903657293676544 binary64)) (*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) R) (*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)))
(if (<=.f64 phi2 #s(literal -5609415803011879/38685626227668133590597632 binary64)) (*.f64 R (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (if (<=.f64 phi2 #s(literal 6346860552976803/302231454903657293676544 binary64)) (*.f64 R (acos.f64 (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (*.f64 R (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(if (<=.f64 phi2 #s(literal -8510837770086989/38685626227668133590597632 binary64)) (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (if (<=.f64 phi2 #s(literal 7253554917687775/9671406556917033397649408 binary64)) (*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (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)) (cos.f64 (-.f64 lambda1 lambda2))))) R)))
(if (<=.f64 phi2 #s(literal -8510837770086989/38685626227668133590597632 binary64)) (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (if (<=.f64 phi2 #s(literal 7253554917687775/9671406556917033397649408 binary64)) (*.f64 R (acos.f64 (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 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)))
(if (<=.f64 phi2 #s(literal -2011652563838743/38685626227668133590597632 binary64)) (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (if (<=.f64 phi2 #s(literal 7011769753764849/1208925819614629174706176 binary64)) (*.f64 (acos.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1))) R) (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)))
(if (<=.f64 phi2 #s(literal -2011652563838743/38685626227668133590597632 binary64)) (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (if (<=.f64 phi2 #s(literal 7011769753764849/1208925819614629174706176 binary64)) (*.f64 R (acos.f64 (*.f64 (cos.f64 phi1) (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.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)) (cos.f64 (-.f64 lambda1 lambda2))))) R)))
(if (<=.f64 lambda1 #s(literal -812247035053579/9444732965739290427392 binary64)) (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)))) R) (if (<=.f64 lambda1 #s(literal 2833419889721787/4722366482869645213696 binary64)) (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))) R) (*.f64 (acos.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))) R)))
(if (<=.f64 lambda1 #s(literal -812247035053579/9444732965739290427392 binary64)) (*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1))))) (if (<=.f64 lambda1 #s(literal 2833419889721787/4722366482869645213696 binary64)) (*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))))) (*.f64 R (acos.f64 (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))))
(if (<=.f64 phi1 #s(literal -7177997053961861/75557863725914323419136 binary64)) (*.f64 (acos.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1))) R) (if (<=.f64 phi1 #s(literal 519460313115661/9444732965739290427392 binary64)) (*.f64 (acos.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))) R) (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))) R)))
(if (<=.f64 phi1 #s(literal -7177997053961861/75557863725914323419136 binary64)) (*.f64 R (acos.f64 (*.f64 (cos.f64 phi1) (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (if (<=.f64 phi1 #s(literal 519460313115661/9444732965739290427392 binary64)) (*.f64 R (acos.f64 (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))))))
(if (<=.f64 phi1 #s(literal -7177997053961861/75557863725914323419136 binary64)) (*.f64 (acos.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1))) R) (*.f64 (acos.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))) R))
(if (<=.f64 phi1 #s(literal -7177997053961861/75557863725914323419136 binary64)) (*.f64 R (acos.f64 (*.f64 (cos.f64 phi1) (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (*.f64 R (acos.f64 (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))
(if (<=.f64 phi2 #s(literal 534955578137577/4611686018427387904 binary64)) (*.f64 (acos.f64 (*.f64 (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1))) R) (*.f64 (acos.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) R))
(if (<=.f64 phi2 #s(literal 534955578137577/4611686018427387904 binary64)) (*.f64 R (acos.f64 (*.f64 (cos.f64 phi1) (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (*.f64 R (acos.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))))
(if (<=.f64 phi2 #s(literal -6845298958456217/26328072917139296674479506920917608079723773850137277813577744384 binary64)) (*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) R) (if (<=.f64 phi2 #s(literal 5908722711110091/144115188075855872 binary64)) (*.f64 (acos.f64 (+.f64 (*.f64 phi2 (sin.f64 phi1)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 phi2 (*.f64 phi2 #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R) (*.f64 (acos.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) R)))
(if (<=.f64 phi2 #s(literal -6845298958456217/26328072917139296674479506920917608079723773850137277813577744384 binary64)) (*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) (if (<=.f64 phi2 #s(literal 5908722711110091/144115188075855872 binary64)) (*.f64 R (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) phi2) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 phi2 (*.f64 phi2 #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))) (*.f64 R (acos.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))))
(if (<=.f64 phi1 #s(literal -7177997053961861/75557863725914323419136 binary64)) (*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) R) (*.f64 (acos.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) R))
(if (<=.f64 phi1 #s(literal -7177997053961861/75557863725914323419136 binary64)) (*.f64 R (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) (*.f64 R (acos.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))))
(if (<=.f64 phi2 #s(literal 3458764513820541/2305843009213693952 binary64)) (*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) R) (*.f64 (acos.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) R))
(if (<=.f64 phi2 #s(literal 3458764513820541/2305843009213693952 binary64)) (*.f64 R (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) (*.f64 R (acos.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)))))
(if (<=.f64 phi1 #s(literal -7177997053961861/75557863725914323419136 binary64)) (*.f64 (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 lambda1))) R) (*.f64 (acos.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) R))
(if (<=.f64 phi1 #s(literal -7177997053961861/75557863725914323419136 binary64)) (*.f64 R (acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 lambda1)))) (*.f64 R (acos.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)))))
(if (<=.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 940126422213591/1125899906842624 binary64)) (*.f64 (acos.f64 (cos.f64 (-.f64 lambda1 lambda2))) R) (if (<=.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4500987539586621/4503599627370496 binary64)) (*.f64 (acos.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) R) (*.f64 (acos.f64 (cos.f64 (-.f64 phi2 phi1))) R)))
(if (<=.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 940126422213591/1125899906842624 binary64)) (*.f64 R (acos.f64 (cos.f64 (-.f64 lambda1 lambda2)))) (if (<=.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4500987539586621/4503599627370496 binary64)) (*.f64 R (acos.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)))) (*.f64 R (acos.f64 (cos.f64 (-.f64 phi2 phi1))))))
(if (<=.f64 (-.f64 lambda1 lambda2) #s(literal -5000 binary64)) (*.f64 (acos.f64 (cos.f64 (-.f64 lambda1 lambda2))) R) (*.f64 (acos.f64 (cos.f64 (-.f64 phi2 phi1))) R))
(if (<=.f64 (-.f64 lambda1 lambda2) #s(literal -5000 binary64)) (*.f64 R (acos.f64 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 R (acos.f64 (cos.f64 (-.f64 phi2 phi1)))))
(if (<=.f64 phi1 #s(literal -7926335344172073/9007199254740992 binary64)) (*.f64 (acos.f64 (cos.f64 phi1)) R) (if (<=.f64 phi1 #s(literal 5713266579666609/24840289476811342962383671815400040884110176273867145778224832608416815242982030181294054541258343647207803691154097171298745280705837030263108596400658898227271279616333598488804244570105575117204207987099463500014285549661056925696 binary64)) (*.f64 (acos.f64 (cos.f64 (-.f64 lambda1 lambda2))) R) (*.f64 (acos.f64 (cos.f64 phi2)) R)))
(if (<=.f64 phi1 #s(literal -7926335344172073/9007199254740992 binary64)) (*.f64 R (acos.f64 (cos.f64 phi1))) (if (<=.f64 phi1 #s(literal 5713266579666609/24840289476811342962383671815400040884110176273867145778224832608416815242982030181294054541258343647207803691154097171298745280705837030263108596400658898227271279616333598488804244570105575117204207987099463500014285549661056925696 binary64)) (*.f64 R (acos.f64 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 R (acos.f64 (cos.f64 phi2)))))
(if (<=.f64 phi1 #s(literal -5324132520958563/5070602400912917605986812821504 binary64)) (*.f64 (acos.f64 (cos.f64 phi1)) R) (if (<=.f64 phi1 #s(literal -3157483383822115/9568131466127621947163770315237577352582483950433331955534014747297500715462012198465648064079848065788579276806882658480425438483841942548911565191978080929321047135323978360596199778018349602045952 binary64)) (*.f64 (acos.f64 (cos.f64 lambda2)) R) (*.f64 (acos.f64 (cos.f64 phi2)) R)))
(if (<=.f64 phi1 #s(literal -5324132520958563/5070602400912917605986812821504 binary64)) (*.f64 R (acos.f64 (cos.f64 phi1))) (if (<=.f64 phi1 #s(literal -3157483383822115/9568131466127621947163770315237577352582483950433331955534014747297500715462012198465648064079848065788579276806882658480425438483841942548911565191978080929321047135323978360596199778018349602045952 binary64)) (*.f64 R (acos.f64 (cos.f64 lambda2))) (*.f64 R (acos.f64 (cos.f64 phi2)))))
(if (<=.f64 lambda1 #s(literal -5188146770730811/72057594037927936 binary64)) (*.f64 (acos.f64 (cos.f64 lambda1)) R) (if (<=.f64 lambda1 #s(literal 7789781865825189/916444925391198758541401085877594831703095653509460880942126390473954048171292933099049096506388108013739504295007991042380699544226348054414240833330066547856411977855334787272537640367327320839841280263415847919229777715415602675691481187407177449472 binary64)) (*.f64 (acos.f64 (cos.f64 phi1)) R) (*.f64 (acos.f64 (cos.f64 lambda2)) R)))
(if (<=.f64 lambda1 #s(literal -5188146770730811/72057594037927936 binary64)) (*.f64 R (acos.f64 (cos.f64 lambda1))) (if (<=.f64 lambda1 #s(literal 7789781865825189/916444925391198758541401085877594831703095653509460880942126390473954048171292933099049096506388108013739504295007991042380699544226348054414240833330066547856411977855334787272537640367327320839841280263415847919229777715415602675691481187407177449472 binary64)) (*.f64 R (acos.f64 (cos.f64 phi1))) (*.f64 R (acos.f64 (cos.f64 lambda2)))))
(if (<=.f64 lambda2 #s(literal 3314649325744685/288230376151711744 binary64)) (*.f64 (acos.f64 (cos.f64 lambda1)) R) (*.f64 (acos.f64 (cos.f64 lambda2)) R))
(if (<=.f64 lambda2 #s(literal 3314649325744685/288230376151711744 binary64)) (*.f64 R (acos.f64 (cos.f64 lambda1))) (*.f64 R (acos.f64 (cos.f64 lambda2))))
(if (<=.f64 lambda1 #s(literal -2833419889721787/37778931862957161709568 binary64)) (*.f64 (acos.f64 (cos.f64 lambda1)) R) (*.f64 (-.f64 lambda2 lambda1) R))
(if (<=.f64 lambda1 #s(literal -2833419889721787/37778931862957161709568 binary64)) (*.f64 R (acos.f64 (cos.f64 lambda1))) (*.f64 (-.f64 lambda2 lambda1) R))
(*.f64 (-.f64 lambda2 lambda1) R)
(*.f64 lambda1 R)

soundness1.8s (7.4%)

Memory
-0.6MiB live, 1 553.8MiB allocated
Rules
15 872×accelerator-lowering-fma.f32
15 872×accelerator-lowering-fma.f64
15 196×accelerator-lowering-fma.f32
15 196×accelerator-lowering-fma.f64
11 474×accelerator-lowering-fma.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
057618081
1190517670
2628417506
0855816323
054294
1298294
22529294
09570281
051217007
1166116597
2504016554
0831115284
049230
1274226
22485226
09137217
01833258
15703232
217093191
331193166
468853165
082272972
01761
17161
254261
3718761
0840958
Stop Event
1×fuel
1×iter limit
1×node limit
1×iter limit
1×node limit
1×iter limit
1×node limit
1×iter limit
1×node limit
1×iter limit
1×node limit
1×iter limit
1×node limit
Compiler

Compiled 2 745 to 1 547 computations (43.6% saved)

preprocess297.0ms (1.2%)

Memory
-13.1MiB live, 253.8MiB allocated
Remove

(sort phi1 phi2)

(negabs R)

Compiler

Compiled 2 280 to 676 computations (70.4% saved)

end0.0ms (0%)

Memory
0.0MiB live, 0.0MiB allocated

Profiling

Loading profile data...